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Vorwort 


Mit dem Mega ST ist die Firma Atari in den professionellen 
Markt vorgestoßen. Schon bisher boten die ST-Modelle dieses 
Herstellers hohe Leistung zu erträglichen Preisen - der Mega ST 
jedoch stellt alles in den Schatten. Die neue Gestaltung des 
Systems sowie ein sensationell großer RAM-Bereich ließen viele 
neue Interessenten zu ST-Anwendern werden. Im Zusammen¬ 
hang mit dem ebenfalls neuen Atari-Laserdrucker ermöglicht 
der Mega ST erstmals die Erstellung druckreifer Vorlagen am 
Schreibtisch - eben Desktop Publishing bzw. DTP. Der Mega- 
ST-Benutzer könnte also sogar seine eigene Zeitung machen - 
oder es beim Briefkopf belassen! 

Ein völlig neu konzipiertes Betriebssystem, der berühmtbe¬ 
rüchtigte (da lange Zeit nicht lieferbare) Spezialchip Blitter, 
nicht zuletzt aber auch die neue Harddisk sowie der speziell für 
die Mega-ST-Reihe entwickelte Laserdrucker machten uns je¬ 
doch eines klar: Es fehlte noch an Büchern, die auf die speziel¬ 
len Eigenschaften und Möglichkeiten des Mega ST eingingen. 
Dem hoffen wir mit dem "Großen Buch zum Mega ST" abge¬ 
holfen zu haben. Dabei haben wir nicht nur an die Freaks ge¬ 
dacht, denen der Umstieg auf den Mega ST sicher durch die 
Tips und Tricks bzw. Programme und Dokumentationen in die¬ 
sem Buch um so leichter fallen wird. Ein großer Teil des Buches 
wendet sich an solche Anwender oder Interessenten, die bisher 
wenig oder gar keinen Kontakt mit dem Computer hatten. 
Gerade in dieser Gruppe finden sich besonders viele neue Mega- 
ST-Besitzer. 

Doch ob Einsteiger oder ST-Profi - in jedem Falle wünschen 
wir Ihnen, daß Sie Ihren Nutzen aus diesem Buch ziehen können 
und etwas von der Begeisterung mitbekommen, die wir bei der 
Arbeit mit dem Mega ST empfunden haben. 


Düsseldorf, im Januar 1988 


Die Autoren 
















Inhaltsverzeichnis 


1. Mega ST für Ein- und Umsteiger . 13 

1.1 Auspacken und anschließen . 20 

1.1.1 Festplatte SH204/205 anschließen . 27 

1.1.2 Mega ST mit Laserdrucker SLM804 . 29 

1.1.3 Die Hardware-Uhr . 32 

1.2 Arbeiten mit Mega ST, TOS und GEM . 33 

1.2.1 Der Einstieg in GEM . 34 

1.2.2 Formatieren, Kopieren und Löschen. 42 

1.2.3 Die Desk-Accessories . 48 

1.2.4 Die RAM-Disk . 50 

1.2.5 Die Funktionen der Desktop-Menüs . 50 

1.3 Der Mega ST und die Festplatte SH205 . 58 

1.3.1 Festplatte vorbereiten . 61 

1.3.2 Adressierung mehrerer Festplatten . 68 

1.3.3 Booten von der Festplatte aus . 69 

1.3.4 Kopieren und Backup. 70 

2. Software für den Mega ST . 73 

2.1 Software umsonst - Public-Domain . 75 

2.2 Professionelle Software . 77 

2.2.1 Programme zur Textverarbeitung . 77 

2.2.2 Grafikanwendungen mit dem Mega ST . 86 

2.2.3 Dateiverwaltungen und Datenbanksysteme . 96 

2.2.4 Mega macht Musik . 98 

2.2.5 Das Spielerparadies . 99 

2.3 Desktop Publishing und Mega ST . 103 

2.3.1 Wie es ist - ohne DTP . 103 

2.3.2 Wie es sein soll - mit DTP. 105 

2.3.3 Was man alles braucht . 107 

2.3.4 Was ist PostScript? . 111 

2.3.5 Desktop Publishing mit BECKERpage ST . 114 
































2.4 Programmieren mit dem Mega ST. 120 

2.4.1 Assembler, Interpreter und Compiler . 120 

2.4.2 Welche Programmiersprache für den Mega ST? . 123 

2.4.3 Alternative Betriebssysteme . 130 

3. Der Mega ST und die Außenwelt . 132 

3.1 Die Schnittstellen - und wie man sie benutzt . 132 

3.2 Wie Datenfernübertragung funktioniert . 141 

3.3 Kommunikations-Software und -Hardware. 143 

4. Die Hardware . 149 

4.1 Die Peripherie . 149 

4.1.1 Augen auf - Monitore am Mega ST . 149 

4.1.2 Die Disketten-Laufwerke . 151 

4.1.3 Die Festplatte am Mega ST . 156 

4.1.4 Welcher Drucker für den Mega ST? . 159 

4.1.5 Der Atari-Laserdrucker SLM804 . 166 

4.2 Die innere Hardware des Mega ST . 194 

4.2.1 Der Speicher des Mega ST . 195 

4.2.2 Die Schnittstellen des Mega ST . 195 

4.2.3 Die Custom-Chips des ST . 196 

4.2.4 Der Blitter . 199 

4.2.5 Die Register der Peripheriebausteine und der 

Custom-Chips . 201 

4.2.6 Die Programmierung des Blitters . 206 

4.2.7 Tastatur-Prozessor. 214 

5. Betriebssystem-Programmierung . 221 

5.1 GEMDOS . 221 

5.2 BIOS . 235 

5.3. XBIOS . 239 

5.4 LINE A . 253 






























5.5 GEM-VDI . 263 

5.6 GEM-AES . 322 

5.7 Beispiel-Programm: Wecker-Accessory . 372 

6. Das BIOS-Listing . 381 

7. Programme zum Mega ST . 479 

7.1 Anpassung von GfA-BASIC 2.0 an den Mega ST .... 479 

7.2 Diskettenlaufwerke . 481 

7.3 Festplattenbetrieb . 490 

7.4 RAM-Disk-Programmierung . 499 

7.5 Differenzen in der Speicherverwaltung . 514 

7.6 Die wichtigsten RAM-Vektoren . 517 

8. Anhang . 521 

8.1 Der Atari-ST-Zeichensatz . 521 

8.2 Tastatur-Codes . 522 

8.3 Füllmuster. 525 

8.4 Schriftarten des ST . 526 

8.5 VT52-Steuersequenzen . 527 

Stichwortverzeichnis . 531 















































Mega ST f ür Ein - und Umsteiger 


13 


1. Mega ST für Ein- und Umsteiger 


Seit dem Herbst des Jahres 1987 gibt es einen neuen Stern am 
Himmel der Microcomputer. Mega ST heißt er und ist eine Ent¬ 
wicklung der Atari Corporation. Der Mega ST trägt seinen 
Namen nicht zu Unrecht - verfügt er doch über einen Haupt¬ 
speicher von noch vor wenigen Jahren unglaublich klingenden 
zwei bzw. vier MByte. Das bedeutet nicht mehr und nicht 
weniger, als daß das RAM (Read Only Memory) dieses Com¬ 
puters runde zwei bzw. vier Millionen Zeichen auf nehmen kann. 
Ein Anwender könnte also ohne weitere Probleme den Textum¬ 
fang eines ganzen Buches in den Speicher dieser Maschine laden 
- und noch viel mehr. Die 64 KByte, die das RAM eines 
Commodore 64 ausmachten, erscheinen dagegen geradezu lach¬ 
haft. Doch die Zeit geht voran und mit ihr die technische 
Entwicklung. 

Neben der enormen Größe des Hauptspeichers, also des Be¬ 
reiches, in dem ein Computer alle Rechenvorgänge abwickelt, 
kann der Mega ST noch mit ganz anderen Superlativen auf¬ 
warten. In seinem Inneren schlägt ein Herz mit der Bezeichnung 
Motorola 68000. So lautet der Name des Prozessors des Mega ST, 
also der CPU (Central Processing Unit). Dieser Chip ist für die 
eigentliche Arbeit des Computers zuständig, verwaltet in hohem 
Maße die umfangreichen Aufgaben, die in einem komplexen 
System wie dem Mega ST gestellt sind. Die CPU 68000 steht 
stellvertretend für eine neue Generation von Prozessoren (Klar, 
es gibt schon leistungsfähigere Microprozessoren, aber die sind 
teurer!). Im Gegensatz zu einem sogenannten 8-Bit-Prozessor 
verfügt ein 68000er intern über Register von 32 und 16 Bit. Was 
darunter genau zu verstehen ist, können Sie in diesem Buch 
lesen. Zuerst mal soviel: Ein System mit einem Prozessor dieses 
Typs ist erheblich leistungsfähiger als ein solches mit einer 8- 
Bit-CPU. 

Der Prozessor Motorola 68000 macht den Mega ST zu einem 
Mitglied der Familie der 16-Bit-Computer. Das gilt allerdings 
auch für die anderen ST-Modelle. Bereits im Spätsommer 1985 
erschien der "Urahn" des Mega ST unter der Bezeichnung "520 
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ST" auf dem Markt. Diese Maschine besaß ebenfalls einen 
68000er als CPU und verfügte über 512 Kilobyte RAM, also ein 
Viertel der Speicherkapazität des kleineren Mega-ST-Modells. 
Einer komfortableren Eingabe diente eine als Maus bezeichnete 
Gerätschaft, die im Zusammenspiel mit einer grafischen Be¬ 
nutzeroberfläche den Atari ST zu einem ausgesprochen leicht zu 
bedienenden System machen sollte. Schon dieser Computer ver¬ 
zauberte die Freaks mit einem gestochen scharfen Bild auf dem 
serienmäßigen Schwarzweiß-Bildschirm (SM 124) sowie enormer 
Rechenleistung, war er doch das erste System mit einem 
68000er-Prozessor, das zu einem erschwinglichen Preis erhältlich 
war. Ein zusätzlich erhältliches Diskettenlaufwerk in hoch¬ 
moderner 3±-Zoll-Technik begeisterte ebenfalls Interessenten 
und Fachpresse. Auch mit dem Farbmonitor SC 1224 ging und 
geht der 520 ST voll zur Sache. Farbgrafik und Animation, also 
bewegte Computergrafik, erreichten bisher unbekannte Dimen¬ 
sionen im Homecomputer-Bereich. Denn das war der 520 ST 
immer noch - ein Homecomputer. Der typische Kabelsalat auf 
und unter dem Schreibtisch war ein deutliches Zeichen für 
mangelnde Professionalität. Schließlich mußten Floppylaufwerk, 
Computer und Bildschirm miteinander verbunden werden. Hinzu 
kamen klobige, einem Kohlenbrikett nicht unähnliche Netzteile 
für Rechner und Floppy. Atari sann auf Besserung der Situation. 
Vorerst begnügte man sich mit der Aufstockung des RAM auf 
ein volles MByte. Der Atari ST 520+ war geboren. 

Das Betriebssystem des Atari ST wurde bald darauf auch auf 
ROM-Bausteinen angeboten. Damit wurde verhindert, daß auch 
dieses umfangreiche Programm, ohne das ein Computer nicht 
funktionieren kann, noch in den Speicherplatz geladen werden 
mußte. An der Brikettversammlung unter dem Tisch änderte das 
indes nichts. Immerhin - viele bekannte Anwenderprogramme, 
z.B. Ist Word, ein Textprogramm, oder der BASIC-Interpreter 
ST BASIC, fanden nun genügend Raum für ihre Aktivitäten. 
Den brauchten sie auch, denn solche Anwendungen benutzen die 
sogenannte Benutzeroberfläche GEM (Graphic Environment 
Manager), die zu einem Markenzeichen für die ST-Computer 
geworden ist und einiges an Speicherplatz benötigt. Von GEM 
wird in diesem Buch noch oft die Rede sein. Jetzt wollen wir 
erst einmal weiter in die ST-Geschichte hineinschauen. 



Mega ST für Ein - und Umsteiger 


15 


Die ST-Familie - vom ersten Versuchsmodell bis zum Mega ST 



Bild lb: Die Grundversion aller Atari ST, der 520ST/ST+ bzw. 260ST 









16 


Das große Mega-ST-Buch 



Bild lc: Die nächste Generation - Atari 1040STF mit eingebautem 720 KB- 

Laufwerk 
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Bild ld: Das Top-Modell - der Mega ST mit 2 oder 4 MB Arbeitsspeicher 


Dem 520+ mit einem MByte RAM folgte bald der 260 ST bzw. 
260 STM. Dieses Gerät hatte die Spezifikationen des guten 
"alten" 520ers, also 512 KByte RAM. Das Modell mit dem 
Anhängsel "STM" verfügte jedoch über einen sogenannten HF- 
Modulator, so daß ein normaler Farbfernseher als Monitor an¬ 
schließbar war. Nur - die "Briketts" blieben ständiges Ärgernis 
des Anwenders. Auch das Betriebssystem von 520er und den 
260ern zeigte erhebliche Schwächen. Die serielle Schnittstelle, 
wichtig für Datenfernübertragung sowie Druckeransteuerung, 
kam ihren Aufgaben nur unvollständig nach. Mit einem seriellen 
Drucker war buchstäblich nichts aufs Papier zu bringen, mitten 
in der Kommunikation mit einer Mailbox war plötzlich Schluß - 
warum, wer weiß es? Atari jedenfalls wußte keinen Rat. Auch 
sonst gab es Probleme mit dem Betriebssystem, das nach dem 
Besitzer-Clan von Atari mit TOS - Tramiel Operating System 
bezeichnet wurde. Mehrere Neuausgaben des TOS zeigten 
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weitaus weniger Fehler, schließlich erschien im Februar 1987 die 
bisher letzte Version des TOS für die "kleinen" ST-Modelle. Die 
Präsentation von "Bomben" auf dem ST-Bildschirm, ein typisches 
Zeichen für einen Absturz oder Fehler trat weniger häufig in 
Aktion. 

Schließlich gelang Atari ein wirklicher Fortschritt mit dem 
Modell 1040 STF. Dieser Computer bestand zwar immer noch 
aus einer Konsole mit Tastatur und der Maus. Ein separates 
Netzteil war jedoch nicht mehr zu sehen, dafür baute Atari ein 
31-Zoll-Laufwerk in den 1040 STF ein, das immerhin eine 
Speicherkapazität von rund 720 KByte besaß. Sogar die Zulas¬ 
sung der Bundespost als Datenendgerät für die Telekom¬ 
munikation wurde dem 1040 STF nicht vorenthalten. 

Vor allem Anwender mit einem zweiten Laufwerk hatten jedoch 
noch immer unter dem unvermeidlichen Kabelsalat zu leiden. 
Zwar gab es verschiedene Bausätze unabhängiger Hersteller, die 
ein PC-ähnliches Gehäuse für den 1040 oder seine Vorgänger 
anboten. Eine echte Lösung konnten diese schon wegen des 
hohen Preises nicht sein. Die Tastatur tat ein übriges, um den ST 
bei manchen Leuten in den Ruf der mangelnden Eignung für 
ernsthaften Einsatz zu bringen. Die Kontakte der Tastatur 
konnten bestenfalls den Ansprüchen von Spiele-Freaks genügen, 
die ohnehin mit dem Joystick zu Werke gingen. Hinzu kamen 
Probleme mit der zu breiten Auslegung der Tasten - man 
rutschte, zumal bei schnellem Schreiben, immer wieder mal auf 
die falsche Taste. Immerhin brachte Atari mit der 20-MByte- 
Festplatte SH 204 eine wirkliche Bereicherung für die ST-Reihe 
auf den Markt. 

Mit dem Mega ST kündigte Atari schließlich einen professionel¬ 
len Computer an. Immerhin dauerte es bis zur CeBIT des Jahres 
1987, bevor die Öffentlichkeit einen ersten Blick auf den neuen 
Rechner werfen konnte. Besonderes Highlight war der Laser¬ 
drucker SLM804, den Atari auf der CeBIT vorstellte und der im 
Verein mit dem Mega ST zu einem sensationellen Preis ange- 
boten werden sollte. Da dieser Drucker weder über eigene 
"Intelligenz" noch über RAM-Speicher verfügt, benötigt er den 
großen RAM-Bereich und die Rechenkapazität des Mega ST, um 
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einigermaßen arbeiten zu können. Der Laserdrucker kam nicht 
allein - im neuen Gewand erfuhr die SH 204 eine erhebliche 
Verbesserung. Mit einem kompakten Gehäuse versehen paßt das 
Gerät, nun mit der Bezeichnung SH 205, exakt unter oder über 
den Mega ST. 

Ob Mega ST2 oder ST4 - beide Rechner stecken in einem 
flachen, annähernd quadratischen Gehäuse. Die Tastatur ist, 
endlich, separat vom eigentlichen Computer angeordnet. So, wie 
man es von einem PC her gewohnt ist. Die Tastaturkontakte 
wurden erheblich verbessert. Etwas labil wirkt das Verbindungs¬ 
kabel zwischen Tastatur und Computer - hier wird Atari viel¬ 
leicht noch etwas tun müssen. Auch der Mega ST verfügt über 
ein eingebautes 720-KByte-Laufwerk. Als weit wichtiger wird 
von den Freaks jedoch ein ganz anderes Bauteil des Mega ST 
gesehen - der Blitter! Dieser Spezialchip (von solchen Chips hat 
der Mega ST, wie auch seine Vorgänger, eine ganze Menge!) 
sorgt per Direktzugriff, also ohne Umweg über den Prozessor, 
für ein schnelles Verschieben oder Füllen von Speicherbereichen. 
Man bezeichnet ein solches Verfahren auch als DMA (Direct 
Memory Access). Auf diese Weise werden grundsätzliche 
Grafikfunktionen des Mega ST erheblich beschleunigt. Viele 
Anwenderprogramme laufen deshalb auf diesem Computer deut¬ 
lich schneller als auf anderen ST-Modellen. Wenn Sie nicht wis¬ 
sen, was Sie sich darunter vorzustellen haben - macht nichts - 
wir werden es in diesem Buch noch genau erklären. Ein 
besonderer Abschnitt des Buches befaßt sich ausführlich mit 
dem Blitterchip, auf den man nach Erscheinen des Mega ST 
noch eine ganze Weile warten mußte. Hohe Fehlerquoten bei der 
Herstellung des hochintegrierten Bauteils zwangen Atari dazu, 
viele Mega ST erstmal ohne Blitter auszuliefern. Doch auch ohne 
Blitter ist der Mega ST ein professionelles Gerät. Auch das TOS 
erfuhr eine erneute Überarbeitung - diesmal wurden große Teile 
völlig neu geschrieben. Das von Fans und Fachpresse als Blitter- 
TOS bezeichnet? neue Betriebssystem zeigt denn auch (fast) 
keine Fehler mehr. 

Wer sich einen Mega ST zugelegt oder die Entscheidung zum 
Kauf getroffen hat, hat mit Sicherheit eine gute Wahl bewiesen 
- er ist auf dem Stande der Technik. 
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Nicht nur für Freaks - Mega-Power für alle 

Auf welchem Wege Sie auch zum Mega ST gekommen sind - die 
folgenden Seiten geben eine umfassende Einführung in die 
Arbeit mit diesem Computer. Die Freaks mögen uns verzeihen, 
wenn ihnen die geschilderten Sachverhalte oder Hinweise allzu 
selbstverständlich Vorkommen. Weiter hinten in diesem Buch 
finden Sie noch reichlich Lesestoff und eine Menge interessanter 
Anwendungen. Und wer auf ein dokumentiertes Listing des 
neuen ROM-TOS gewartet hat, wird ebenfalls zufriedengestellt. 
Und trotzdem: Viele Anwender besitzen mit dem Mega ST ihren 
ersten Computer überhaupt, andere arbeiteten zuvor mit einem 
MS-DOS-Rechner oder vielleicht einem Commodore 64. Für 
diese Gruppen dürfte die Lektüre dieses umfangreichen ersten 
Kapitels sicher von Nutzen sein. 


1.1 Auspacken und anschließen 

Wie wohl jeder halbwegs gescheite Computer kommt auch der 
Mega ST sicher verpackt in einem schönen Karton daher. Daß 
man diesen Karton mit einer gewissen Vorsicht öffnen sollte, 
braucht wohl nicht erst gesagt zu werden. Nach dem Entfernen 
von Utensilien wie Plastiktüten und Styroporeinsätzen steht der 
Mega ST bald in seiner ganzen Schönheit auf dem Tisch. Auf 
diesem sollte man etwas Platz schaffen, denn den werden Sie 
noch brauchen. 

An seine Umgebung stellt der große Atari keine besonderen 
Ansprüche - nicht zu kalt und nicht zu warm sollte es sein. 
Während allerdings zu niedrige Temperaturen fern der Arktis 
selten auftreten sollten, kann eine Aufstellung nahe der Heizung 
oder gar neben einem Ofen recht üble Folgen haben. Viele Chips 
zeigen nämlich bei zu hoher Temperatur seltsamste Eigen¬ 
schaften - was nicht ohne Einfluß auf die Rechnerfunktion 
bleibt. Kurz und gut - der Mega ST liebt Temperaturen, bei 
denen auch der Benutzer, also Sie, sich wohl fühlt. 

Wichtig: Sie sollten in der Nähe eines Computersystems mög¬ 

lichst auf das Rauchen verzichten. Die im Rauch 
enthaltenen Partikel führen zu starker Verschmut- 
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zung des Rechners und leisten einer Fehlfunktion 
Vorschub. Vor allem für den Schreib-/Lesekopf 
einer Diskettenstation wirkt ein Rauchpartikel wie 
ein Felsbrocken. Kopf und Diskette könnten Schaden 
nehmen. 

Natürlich brennen Sie nun darauf, möglichst schnell den neuen 
Computer in Aktion zu sehen - doch halt: Erst einmal nachge¬ 
sehen, was sich noch alles in dem großen Karton befindet! In 
einer kleinen Pappschachtel finden sich verschiedene Kabel, die 
zur Verbindung des Mega ST mit der Außenwelt, sprich zum 
Netz- und Tastaturanschluß dienen. Eine weitere Schachtel 
bringt das Gerät zum Vorschein, dem ein gewisses Nagetier 
seinen Namen gegeben hat - die Maus. Auch die hat ein Kabel, 
über welches der Anschluß an den Mega ST erfolgt. Schließlich 
müßten Sie noch auf eine mit grauem Atari-Etikett versehene 
Diskette stoßen, welche die Aufschrift Language-Disk trägt. 
Steht auch noch Germany drauf, ist es die richtige. 



Bild 1: Nicht wegzudenken - die Atari-Maus 


Die Kartons nehmen kein Ende - noch einen sollten Sie zu¬ 
mindest vor sich stehen haben. Er enthält den Monitor, der im 
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Paket mit dem Mega ST geliefert wird. Ob Farbmonitor oder 
nicht - das ist ohne besondere Bedeutung für die folgenden 
Schritte. 

An der Rückseite des Mega-ST-Gehäuses befinden sich deutlich 
sichtbar eine Reihe von Anschlüssen. Wenn Ihnen bereits der 
Umgang mit Atari-ST-Computern geläufig ist, kennen Sie die 
meisten davon bereits. In diesem Fall können Sie die folgenden 
Absätze natürlich auch überschlagen. Es ist Ihr erster ST? Na, 
denn los! 



Bild 2: Die Rückseite des Mega ST mit den Schnittstellen 


Eigentlich ist es kein besonderes Problem, den Mega ST 
arbeitsfähig zu machen. Wichtig ist nur: Mit Färb- oder Mono¬ 
chrom-Monitor benimmt sich der Rechner recht unterschiedlich. 
Doch dazu später. Stellen Sie jetzt Ihren Monitor auf den Mega 
ST, das verträgt er ganz gut. Über die Wärmeabstrahlung 
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brauchen Sie sich nach unseren Erfahrungen keine Sorgen zu 
machen - der kleine Ventilator, das zugehörige Gitter sehen Sie 
an der Rückseite des Mega ST, verschafft dem Computer genug 
Kühlung. Das am Monitor befestigte Kabel wird mit dem ent¬ 
sprechenden Stecker an die Buchse Monitor des Mega ST ange¬ 
schlossen. Nun fehlt nur noch die Tastatur. Das relativ kurze 
Spiralkabel mit den seltsamen Anschlüssen dient dazu. 

Kabel dieses Typs dienen im Ausland, vor allem in den USA, 
zum Anschluß eines Telefons. An der linken Seite des Mega ST 
wird das Kabel eingesteckt, ebenso an der Rückseite der Tasta¬ 
tur. In der Gehäuseausbuchtung, in der sich der Tastaturan¬ 
schluß befindet, sehen Sie eine weitere Steckleiste - den soge¬ 
nannten Modulport. Auch davon werden Sie noch mehr zu lesen 
bekommen. 






ZZZZ/zi./ ZZ /. 
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Bild 3: Die Tastatur des Mega ST entspricht nur optisch den Vorgängern - im 

Inneren tun neue Kontakte ihren Dienst 


Jetzt müssen nur noch die Netzkabel des Mega ST sowie des 
Monitors angeschlossen werden, dann kann es losgehen. Was 
fehlt, ist noch die Maus. Dieses kleine "Tierchen" wird an der 
Unterseite der Tastatur angeschlossen. Wenn Sie die Tastatur vor 
sich liegen haben, drehen Sie sie bitte um. Auf der linken Seite 
befinden sich zwei Anschlußbuchsen in entsprechenden Nischen 
des Gehäuses. Die rechte Nische dient dem Mausanschluß. Auf 
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der linken Seite können Sie einen Joystick anschließen. Das 
Kabel der Maus wird nun entlang der an der Unterseite der 
Tastatur sichtbaren Rinne hineingedrückt. Beim Anschluß eines 
Joysticks an der linken Tastaturbuchse müssen Sie eventuell den 
kleinen Kunststoff-Grat wegfeilen, damit das Joystick-Kabel 
überhaupt nach links aus der Tastatur herausgeführt werden 
kann. Hier hat Atari wohl etwas die Stärke üblicher Joystick- 
Kabel unterschätzt. Diese kleine Operation dürfte Ihre Garantie- 
Ansprüche kaum gefährden. 



Bild 4: Die Tastatur von unten - die linke Nische enthält die Joystick-Buchse, 

rechts wird die Maus angeschlossen. Rechts und links die herausklapp¬ 
baren Füße zum Verstellen der Tastaturneigung 


Nun stehen Sie kurz vor den ersten Lebensäußerungen Ihres 
Mega ST. Was die beiliegende Diskette betrifft: Darauf befindet 
sich in der Regel das ST BASIC - ein Interpreter, der zwar mit 
einer grafischen Benutzerführung ausgestattet ist, jedoch erheb¬ 
lich geringere Leistung bringt als beispielsweise das GFA-BASIC 
der Firma GFA Systemtechnik. Zum Starten des Rechners 
brauchen Sie ST-BASIC nicht. Wenn Sie nun Monitor und Maus 
angeschlossen haben, kann es losgehen. Legen Sie die Language- 
Disk in das Laufwerk Ihres Mega ST, und betätigen Sie den an 
der Rückseite Ihres Rechners befindlichen Schalter. Eine im 
Laufwerk befindliche Diskette beschleunigt den Startvorgang 
erheblich. Zuvor wird noch der Monitor eingeschaltet, indem der 
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Volume-Knopf nach unten gedreht wird. Der Bildschirm er¬ 
wacht zum Leben und zeigt eine kleine Grafik in Form einer 
Biene. Diese ist beim Mega ST immer dann zu sehen, wenn der 
Computer auf Diskette oder Festplatte zugreift. In dieser Zeit 
kann keine Eingabe in den Rechner erfolgen. 

Nach kurzer Zeit erscheint das sogenannte Desktop auf dem 
Bildschirm - entweder in Schwarzweiß oder weiß auf grün, 
wenn Sie einen Farbmonitor verwenden. Am linken, oberen 
Rand des Bildschirms sehen Sie nun zwei Icons, das sind Sinn¬ 
bilder für die vorhandene Diskettenstation sowie für eine 
"Pseudofloppy". Das bedeutet, daß diesem Symbol keine wirklich 
vorhandene Floppystation zugeordnet ist. Haben Sie zwei Flop- 
pys, handelt es sich natürlich bei beiden Icons um Sinnbilder für 
Diskettenstationen. Diese Sinnbilder haben die Form eines 
Karteikastens mit den Bezeichnungen A und B sowie Floppy. Sie 
können diese Bezeichnungen auch ändern. Darüber später mehr. 
Der Mega ST ist nun bereit zur Arbeit. 

Wichtig: Beachten Sie beim Einschalten des Systems immer 

die folgende Reihenfolge: Zuerst wird der Monitor 
eingeschaltet, dann ein eventuell vorhandener 
Drucker (auch Laserdrucker), schließlich ein 
möglicherweise vorhandenes zweites Laufwerk - und 
ganz zuletzt erst der Rechner. 

Die erste Aktion sollte nun darin bestehen, daß Sie die Maus des 
Mega ST ein wenig bewegen - der auf dem Bildschirm sichtbare 
Pfeil sollte sich entsprechend mitbewegen. Tut er das nicht, ist 
irgendein Fehler aufgetreten. Überprüfen Sie dann, ob die Maus 
richtig angeschlossen ist oder ob vielleicht noch die Rollkugel 
der Maus durch eine Transportsicherung blockiert ist. 

Wichtig: Wenn die Maus nach längerem Einsatz nicht 

ordnungsgemäß funktioniert, kann es auch daran 
liegen, daß sie verschmutzt ist. Die eingelegte Roll¬ 
kugel dient der Übermittlung der Mausbewegung an 
Sensoren in der Maus. Diese Übermittlung erfolgt 
über kleine Röllchen, die im Laufe der Zeit stark 
verschmutzen und ungleichmäßig laufen. Reinigen 
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Sie sie dann mit einem milden Reinigungsmittel, das 
keinen Kunststoff angreift oder leitend ist. Zuvor 
muß natürlich die Kugel herausgenommen werden, 
wie es im Handbuch beschrieben ist. 

Geraten Sie mit dem Mauszeiger an die oben sichtbare Leiste 
mit verschiedenen Namen, so klappen jeweils sogenannte Pull- 
Down-Menüs herunter, die eine Reihe von Funktionen ermög¬ 
lichen. Damit werden wir uns auf den nächsten Seiten noch 
näher befassen. 

Ach ja - bevor wir es vergessen: Wenn Sie eine zweite Floppy- 
station gekauft haben, verbinden Sie diese mit dem beiliegenden 
Kabel mit der Buchse Floppy an der Rückseite des Mega ST. An 
der zusätzlichen Floppy muß der Eingang "IN" benutzt werden. 

Es gibt zwei verschiedene Floppys des Herstellers Atari. Einmal 
die SF 354 mit 360 KByte (entspricht etwa 360.000 Zeichen) 
Kapazität, zum anderen die SF 314, die mit gleichen Leistungen 
aufwarten kann wie die eingebaute Floppy - rund 720 KByte, 
also etwa 720.000 Zeichen stehen als Speicherplatz zur Ver¬ 
fügung. Mehr als zwei Floppylaufwerke können aus technischen 
Gründen nicht angeschlossen werden. Verwenden Sie zwei 
Laufwerke, muß das zusätzliche Drive vor dem Einschalten des 
Rechners eingeschaltet werden, sonst erkennt der Mega ST es 
nicht. Einige Fremdanbieter, wie beispielsweise Cumana, haben 
verschiedene Floppylaufwerke auf den Markt gebracht, die am 
Mega ST eingesetzt werden können. Interessant wird es dann, 
wenn man z.B. ein Laufwerk mit 51 Zoll anschließt - es können 
dann Textdateien von MS-DOS-Systemen übernommen und 
weiterverarbeitet werden. 
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DESK DATEI INDEX EXTRAS 



Bild 5: Erste Lebenszeichen - das Desktop des Mega ST 


Verantwortlich für die grafische Benutzeroberfläche (ein schönes 
Wort, nicht wahr?) ist das GEM, oder sollte man besser sagen 
"der GEM"? GEM ist nämlich die Abkürzung für Graphics 
Environment Manager. Normalerweise wird Sie GEM während 
Ihres gesamten ST-Lebens begleiten - auch wenn es Programme 
gibt, die ohne selbiges auskommen. Zu GEM und wie man damit 
arbeitet lesen Sie gleich mehr. Zuerst noch einige Hinweise für 
Zeitgenossen, die eine Festplatte SH204/205 und/oder einen 
Laserdrucker des Typs SLM804 besitzen. 


1.1.1 Festplatte SH204/205 anschließen 

Vielleicht haben Sie Ihren Mega ST ja gleich mit einer Festplatte 
gekauft, weil der Verkäufer Ihnen gesagt hat, daß Sie mit einer 
Festplatte oder auch Harddisk, wie die englischsprachigen Mit¬ 
menschen dieses Gerät nennen, viel mehr anfangen können. 
Vielleicht wissen Sie aber auch genau, wozu eine Festplatte dient 
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und wie nützlich sie sein kann, weil Sie bereits einen Atari ST 
oder anderen Rechner mit Harddisk besessen haben oder be¬ 
nutzten. Wie man die Harddisk anschließt, soll hier erläutert 
werden. 

Dem Karton mit der Festplatte SH205 (Sie können natürlich 
auch eine SH204 anschließen - nur paßt die nicht so schön unter 
den Computer) entnehmen Sie bitte das beiliegende Kabel. An 
der Rückseite des Mega ST sowie der Festplatte, die im gleichen 
Gehäuse daherkommt wie der Rechner, befinden sich Buchsen 
mit den Bezeichnungen Harddisk bzw. Harddisk In und Hard¬ 
disk Out. Bei der SH204 gibt es nur eine einzige Buchse ohne 
Bezeichnung, sie entspricht Harddisk In. Verbinden Sie nun die 
Buchse Harddisk des Mega ST mit Harddisk In der Festplatte 
SH205 bzw. der Buchse der SH204. Schließen Sie die SH204/205 
mit dem beiliegenden Netzkabel an die Stromversorgung an. Die 
Buchse am Mega ST ist eine sogenannte DMA-Schnittstelle. Was 
das ist, erfahren Sie in den folgenden Kapiteln. Übrigens: Indem 
Sie die SH 205 unter den Mega ST stellen, können Sie eigentlich 
erst bequem den Diskettenschacht der eingebauten Floppy er¬ 
reichen, vor allem dann, wenn Sie die Tastatur hochgestellt 
haben. 

Nun sind Sie sicher neugierig darauf, was sich mit der Festplatte 
anstellen läßt - keine Sorge, dazu kommen wir noch. Vorerst 
sollten Sie die Festplatte zwar wie beschrieben anschließen, den 
Netzschalter jedoch erst einmal unberührt lassen. Starten Sie den 
Mega ST dann, wie oben beschrieben, unter Verwendung der 
Language-Disk, und machen Sie sich mit den grundsätzlichen 
Arbeitsmethoden unter GEM vertraut. 
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Bild 6: Passen gut zueinander - Mega ST und Festplatte 


1.1.2 Mega ST mit Laserdrucker SLM804 

Im Zusammenhang mit den Computern der Mega-Reihe bietet 
Atari auch einen Laserdrucker an. Der SLM804 ist erheblich 
preiswerter zu erwerben als alle anderen bisher verfügbaren 
Laserdrucker. Das hat natürlich Gründe, auf die wir später noch 
eingehen werden. Angeschlossen wird der SLM804 an eben die 
Schnittstelle, an die normalerweise die Festplatte gehört - Hard¬ 
disk bzw. DMA heißt die Devise. Wie man exakt seinen Laser¬ 
drucker anschließt, zeigt die folgende Grafik. 





30 


Das grojie Mega-ST-Buch 


Laserdrucker SLM804 



Heitere Festplatten 


Bild 7: Anschließen von Festplatte und Laserdrucker 


Der SLM804 muß vor dem ersten Einsatz noch halbwegs 
zusammengebaut werden - folgen Sie den Hinweisen des 
kleinen, mitgelieferten Handbuchs. Einige Hinweise zum Betrieb 
des SLM804 finden Sie auch im 3. Kapitel. Weiterhin gehört 
noch ein sogenanntes Interface der Bezeichnung SLMC804 zum 
Lieferumfang. Die oben abgebildete Grafik zeigt, wie der An¬ 
schluß erfolgt. Das recht dicke Kabel, das dem Interface bei¬ 
liegt, verbindet SLMC804 und Laserdrucker SLM804. Ver¬ 
wenden Sie dazu die breitere der beiden Steckerleisten des 
SLMC804 mit dem entsprechenden Eingang des Laserdruckers. 
Das direkt am Interface befindliche Kabel wird mit der Buchse 
Harddisk des Computers verbunden. Die Harddisk wird, soweit 
vorhanden, an den freibleibenden Anschluß des Interfaces an¬ 
geschlossen. Auf keinen Fall darf die Festplatte zuerst an den 
Mega ST angeschlossen werden, das System würde nicht 
ordnungsgemäß funktionieren. Ob der Laserdrucker wirklich 
etwas druckt, ist eine Frage der von Ihnen eingesetzten Pro- 
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gramme. Auf die Installation des mitgelieferten, recht begrenzten 
Druckerprogramms für den SLM804 gehen wir im Kapitel 3 
noch näher ein. Vorerst sollten Sie weder Festplatte noch Laser¬ 
drucker ansteuern. Prinzipiell aber gilt: 

Wichtig: Der Laserdrucker muß immer zuerst eingeschaltet 

werden. Warten Sie dann, bis die ganz links auf der 
Front des Druckers befindliche grüne Kontrollampe 
aufleuchtet, bevor Sie Laufwerke und Rechner ein¬ 
schalten. Es kann einige Zeit dauern, bis der Laser¬ 
drucker bereit ist. Auch wenn Sie den SLM804 nicht 
benutzen wollen, muß er eingeschaltet sein, ist er 
einmal angeschlossen. Es kann ansonsten zu Daten¬ 
verlusten kommen. 



Bild 8a: Laserdrucker-Controller SLMC804 
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Bild 8b: Laserdrucker SLMC804 


1.1.3 Die Hardware-Uhr 

Der Mega ST verfügt über eine Hardware-Uhr. Eine solche Uhr 
stellt Ihrem Computer immer die aktuelle Zeit sowie das Datum 
zur Verfügung, sofern Sie sie richtig einstellen. Eine Datei wird 
dann beispielsweise immer mit der korrekten Zeit ihrer Erstel¬ 
lung abgespeichert. Dank zweier Batterien, die Sie in das links 
oben auf der Oberfläche des Rechnergehäuses befindlichen Bat¬ 
teriefach einlegen müssen, bleibt die korrekte Uhrzeit auch dann 
erhalten, wenn Sie den Rechner ausschalten. Verwenden Sie zwei 
der handelsüblichen 1.5-Volt-Mignonzellen, möglichst von bes- 
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serer Qualität. Eingestellt wird die Uhr z.B. mit Hilfe des Kon- 
trollfeldes (siehe hierzu auch die Beschreibung der Desktop- 
Rollmenüs). Es gibt auch Programme, die das Stellen der Uhr 
ermöglichen. 


1.2 Arbeiten mit Mega ST, TOS und GEM 

Der Mega ST verfügt über eine sogenannte grafische Benutzer¬ 
oberfläche. Das erkennt man sofort, wenn der Rechner 
ordnungsgemäß eingeschaltet wurde. Es erscheint eine Bild¬ 
schirmdarstellung, die für alle Atari ST typisch ist. Aufgebaut 
ist sie aus Sinnbildern (sogenannten Icons) für Floppylaufwerke 
und bestimmte Operationen, wie z.B. das Löschen von Dateien. 
Des weiteren besteht der Bildschirmaufbau (auch Desktop ge¬ 
nannt) aus einer Menüleiste am oberen Bildrand, die das Her¬ 
unterklappen der Pop-Up-, Pull-Down- oder ganz einfach 
Rollmenüs erlaubt. 

Alle Eingaben oder Einstellungen beim Mega ST und den 
anderen Atari-ST-Computern erfolgen normalerweise über das 
Desktop. Dazu benutzt man die Maus als Eingabe- bzw. Aus¬ 
wahlgerät, indem einfach mit dem auf dem Bildschirm sicht¬ 
baren Mauszeiger auf die gewünschte Funktion gefahren wird. 
Die Bestätigung einer Auswahl erfolgt durch "Klicken" mit der 
linken der beiden Maustasten. Manchmal, vor allem in An¬ 
wenderprogrammen, hat auch die rechte Taste eine Funktion. 
Wie schon früher gesagt, ist GEM für die Benutzeroberfläche 
verantwortlich. Wie auch das eigentliche Betriebssystem befindet 
sich das GEM Ihres Mega ST auf ROM-Bausteinen Ihres Com¬ 
puters. Es steht daher nach jedem neuen Start (Booten) des 
Rechners zur Verfügung, ohne daß es erst von Diskette geladen 
werden muß. 

Die meisten erhältlichen Anwenderprogramme benutzen GEM, 
denn es stellt nicht nur Möglichkeiten zur Verfügung, Disketten 
und Dateien zu löschen oder zu kopieren sowie Programme zu 
starten. GEM erlaubt auch die Verwendung sogenannter Dialog¬ 
boxen und Objekt Auswahlen. Eine Dialogbox ermöglicht die 
Rückfrage des Systems nach beliebigen Parametern bzw. Werten 
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oder z.B. nach einer Entscheidung des Benutzers für oder gegen 
eine Aktion. Meist können Dialogboxen auch über Tasten be¬ 
arbeitet werden. Die einfachste Form der Dialogbox ist meist 
eine einfache Systemmeldung, die durch Klicken auf das Symbol 
OK bestätigt wird. 


Ohne GEM: TOS-Anwendungen 

Manche Anwenderprogramme verzichten auch auf GEM und 
seine Vorteile. In diesem Falle läuft die gesamte Kommunikation 
mit dem Anwender meist nur über Tastatureingaben ab. Viele 
Benutzer, die von anderen Rechnern her keine grafischen 
Benutzerhilfen kennen oder gewohnt sind, verzichten auch frei¬ 
willig auf die Hilfe von GEM, zumindest für grundsätzliche 
Operationen wie Kopieren oder Diskettenverzeichnis anzeigen. 
Für diesen Anwenderkreis gibt es sogenannte Command-Line- 
Programme, die eine Rechner-/Anwender-Schnittstelle ähnlich 
der bei MS-DOS-Computern ohne GEM anbieten. 

Die Eingaben an den Rechner erfolgen dann "ganz normal" in¬ 
nerhalb einer Bildschirmzeile und werden wie üblich durch die 
Return-Taste bestätigt. Von Atari ist ein Programm namens 
COMMAND.PRG erhältlich, das diesem Zweck dient. Aus einer 
zeilenorientierten Oberfläche heraus können selbstverständlich 
auch GEM-Anwendungen gestartet werden. Reine TOS-An- 
wendungen verzichten jedoch gänzlich auf GEM. Es ist übrigens 
weit weniger aufwendig, eine solche Anwendung zu program¬ 
mieren. Erste Gehversuche mit einer Programmiersprache, z.B. 
C, sollte man deshalb an einer TOS-Anwendung vornehmen. Die 
Einbeziehung von GEM ist zwar reizvoll, jedoch nicht leicht für 
wenig erfahrene Programmierer. 


1.2.1 Der Einstieg in GEM 

In diesem Abschnitt wollen wir Sie mit den grundsätzlichen 
Operationen unter GEM vetraut machen. Eine Festplatte bzw. 
den Laserdrucker, lassen wir dabei erst einmal außer acht. 
Betrachten wir nur den Mega ST mit seinem Laufwerk und dem 
Monitor. 
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DESK 


DATEI 


INDEX EXTRAS 



Bild 9: Das GEM-Desktop mit den Rollmenüs 


Nach dem Einschalten sehen Sie das erwähnte Bild mit den 
Sinnbildern für eine Floppystation A sowie B. Diese Icons be¬ 
finden sich am linken oberen Bildschirmrand. Genau darunter, 
jedoch am unteren Rand befindet sich ein Icon in Form einer 
Mülltonne - genau das ist auch gemeint: Dieses Symbol dient 
zum Löschen von Dateien. Doch dazu später. Fahren Sie nun mit 
dem Mauszeiger an der oben sichtbaren Menüleiste langsam ent¬ 
lang. Nacheinander klappen verschiedene Rollmenüs herunter, 
die unterschiedliche Einträge enthalten. Bei manchen Program¬ 
men gibt es weit mehr Rollmenüs, die auch in mehreren Ebenen 
angeordnet sein können. Sie haben es zuerst nur mit den Menüs 
DESK, DATEI, INDEX und EXTRAS zu tun. Haben Sie ein 
solches Menü heruntergeklappt und fahren dann mit dem 
Mauszeiger darin rauf und runter, erscheint der jeweils berührte 
Menüpunkt in inverser Darstellung. Ein Klicken mit der linken 
Maustaste führt dann sofort zur Ausführung der gewählten 
Funktion. Probieren Sie es doch gleich einmal aus. Gehen Sie 
mit dem Mauszeiger auf das Menü EXTRAS, und wählen Sie 
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die Option "Voreinstellungen.." aus, indem Sie einmal auf den 
linken Mausknopf drücken - es erscheint die folgende Dialog¬ 
box: 


DESK DATEI INDEX 



Bild 10: Dialogbox "Voreinstellung.." 


Sie müssen nur noch mit dem Mauszeiger auf Ja oder Nein zu 
den genannten Bestätigungen von Lösch- und Kopierfunktion 
bzw. auf das Feld mit der gewünschten Bildschirmauflösung 
fahren und anschließend klicken. Optionen in heller bzw. 
kursiver Schrift können solange nicht benutzt werden, bis Sie in 
voller Schrift erscheinen. Z.B. ist die Wahl der mittleren und 
niedrigen Auflösung bei angeschlossenem Schwarzweiß-Monitor 
nicht möglich - umgekehrt würde der Schriftzug HOCH bei 
Verwendung eines Farbmonitors in heller Schrift erscheinen. 

Grundsätzlich wissen Sie jetzt bereits, wie man mit GEM um¬ 
geht. Eine ganz wichtige Sache haben wir aber noch gar nicht 
angesprochen: Wie kommt man eigentlich an den Inhalt einer 
Diskette? Die Beantwortung dieser Frage führt geradewegs zu 
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zwei Grundfunktionen der Maus: Zum Klick und zum Doppel¬ 
klick. Hört sich recht lustig an, nicht war? Generell gilt nämlich 
ab sofort: 

1. Ein einfacher Mausklick auf ein Disketten- oder Datei¬ 
symbol wählt das betroffene Objekt für weitere Aktionen 
aus. 

2. Ein zweifaches Klicken mit der linken Maustaste auf ein 
Symbol wirkt in der Regel sofort. 

Wichtig: Es kann zu Beginn etwas schwierig sein, einen dop¬ 

pelten Mausklick hinzukriegen. Übung macht hier 
den Meister - allerdings läßt sich die Geschwindig¬ 
keit der Mausklick-Erkennung auch einstellen. 

Klicken Sie nun auf das Symbol in Form eines Karteikastens mit 
der Bezeichnung A. Es wird nun invers dargestellt. Sie könnten 
nun beispielsweise die Funktion "zeige Info.." im Rollmenü 
DATEI benutzen. Es erscheint eine Dialogbox mit den Daten der 
invers dargestellten Diskettenstation. Klicken Sie auf OK - die 
Box verschwindet wieder. Wenn Sie nun beim nächsten Mal mit 
einem Doppelklick "zuschlagen", öffnet sich auf dem Bildschirm 
ein Fenster: 

Die erscheinenden Symbole stehen für Unterverzeichnisse, Pro¬ 
gramme und andere Dateien, die auf der im Laufwerk A be¬ 
findlichen Floppy sind. Wie Sie mit dem Fenster arbeiten, ent¬ 
nehmen Sie bitte der obigen Grafik. Wenn Sie nun eine andere 
Diskette einlegen, genügt ein Betätigen der Esc-Taste, um das 
Verzeichnis dieser Floppy auf den Bildschirm zu zaubern. Das 
Herumblättern im Fenster ist ebenso einfach wie die Auswahl 
eines Programms. Ein Doppelklick auf ein rechteckiges Symbol 
startet in der Regel ein Programm, nach selbigem Klick auf 
eines der Symbole mit der "umgeknickten" Seite fragt das System 
nach, ob man ausdrucken, auf dem Bildschirm ansehen oder ab¬ 
brechen will. 
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DESK DATEI INDEX EXTRAS 



Bild 11: Fenster mit dem Verzeichnis der Floppy A 


Wir wollen nun noch einmal mit Hilfe einer Liste kurz auf¬ 
zählen, welche Bedeutung die verschiedenen Icon-Typen haben 
und wie man Sie verwendet: 


Programm-Icon, Programme starten 

Programm-Icons sind rechteckige Symbole, unter denen jeweils 
der Name des Programms zu lesen ist. Ein Doppelklick auf ein 
solches Icon startet das Programm. Während des normalen Lade¬ 
vorganges erscheint der Programmname im oberen Rand des 
Desktops. Bei manchen kommerziellen Programmen werden auch 
schon während des Ladens Grafiken angezeigt, oder es ist Musik 
zu hören. Der Name eines Programms läßt sich mit der Funktion 
"zeige Info" im Menü DATEI ändern. Gehen Sie einfach mit 
einem Klick des Mauszeigers in die Infobox, und tippen Sie den 
neuen Namen ein. 
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Es gibt verschiedene Programmtypen beim Mega ST. Unter¬ 
scheiden kann man vier Grundtypen anhand ihrer Extensionen. 

Als Extension einer Datei bezeichnet man das Kürzel nach dem 
des Dateinamens. Wir haben es beim Mega ST mit den fol¬ 
genden Programmtypen zu tun: 

A) .PRG ist eine reine GEM-Anwendung bzw. Applikation. 

Ein solches Programm verwendet die Benutzeroberfläche 
von GEM zur Kommunikation mit dem Benutzer. Zu einer 
GEM-Anwendung gehört oft ein File mit der Extension 
.RSC. Dieses File enthält wichtige Definitionen für den 
Einsatz der grafischen GEM-Funktionen. Ohne dieses File 
können die betreffenden Programme nicht laufen. Der 
Name des RSC-Files entspricht dem der GEM-An¬ 
wendung. Beispiel: WORDPLUS.PRG und 

WORDPLUS.RSC. 

B) .ACC ist eine besondere GEM-Applikation, die ständig im 
RAM des Mega ST verbleibt, solange er eingeschaltet 
bleibt. Solche Hintergrundprogramme können jederzeit 
unabhängig vom gerade laufenden Programm gestartet 
werden. Nach Abarbeitung eines Accessory-Programms, so 
die korrekte Bezeichnung, kehrt der Rechner normaler¬ 
weise in die gerade aktive Applikation zurück. 

C) .TOS bezeichnet eine reine TOS-Anwendung ohne Einbe¬ 
ziehung von GEM und seinen Möglichkeiten. 

D) .TTP ist ebenfalls eine reine TOS-Anwendung - nur er¬ 
wartet das Programm vor dem Start einen oder mehrere 
Parameter, die mit einer Dialogbox abgefragt werden. 
Beispiel: Ein Textprogramm erhält vor dem Start den 
Namen des zu bearbeitenden Dokumentes übermittelt. Der 
Start erfolgt dann gleich mit dem Dokument. 


Unterverzeichnis-Icon, Ordner 

Unterverzeichnisse haben in GEM die Form eines Aktenordners, 
eigentlich mehr die eines Hängeordners, wie er im Büro in den 
Schränken hängt. Die rechte obere Ecke eines solchen Ordners 
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zeigt einen kleinen Reiter, wie bei einem Register üblich. Ein 
solches Unterverzeichnis nennt man beim Mega ST auch Ordner. 
Bis zu acht Ordner- bzw. Unterverzeichnisebenen sind möglich, 
der Versuch, weitere Ebenen zu erzeugen, endet mit einer 
Fehlermeldung. Ein Doppelklick auf einen Ordner öffnet das 
Verzeichnis dieses Unterverzeichnisses, in dem also wieder 
weitere Ordner stehen können. Es ist zwar nur möglich, in je¬ 
dem Rootdirectory (die oberste Ebene, z.B. A:\ oder B:\ bei 
Disketten oder C:\ bei Festplatten) oder in einem bereits vor¬ 
handenen Ordner bis zu acht bzw. sieben weitere Ordner zu 
schachteln. Insgesamt ist die Zahl der vorhandenen Unterver¬ 
zeichnisse beim Mega ST jedoch nur durch den vorhandenen 
Speicherplatz des Mediums begrenzt. 

Angelegt werden Unterverzeichnisse bzw. Ordner durch An¬ 
wählen der Funktion "neuer Ordner" im Rollmenü DATEI des 
Desktops. Sie können dann einen Namen für das neue Verzeich¬ 
nis eingeben. Angelegt wird der neue Ordner im aktuellen Ver¬ 
zeichnis, das Sie in Ihrem aktiven Bildschirmfenster sehen. Um 
Ordner zu schachteln, klicken Sie einfach doppelt in den ersten 
Ordner, und es erscheint der Inhalt dieses Verzeichnisses auf 
dem Desktop. Verfahren Sie nun wie oben. Aber wie gesagt - 
nach sieben Ebenen ist Schluß! 
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DESK DATEI INDEX EXTRAS 



Bild 12: Verzeichnisebenen beim Mega ST mit GEM 


Datei-Icon, Dokument 

Die dritte Art von Sinnbild im GEM-Fenster steht für reine 
Textdateien genauso wie für Parameterlisten oder Teile von Pro¬ 
grammen, die von einer Applikation nachgeladen werden. 
Klicken Sie mit der Maus doppelt auf ein solches Icon, erscheint 
eine Dialogbox, die Ihnen ermöglicht, die Datei auszudrucken, 
auf dem Bildschirm anzuschauen oder den Vorgang abzubrechen. 
Bei der Anzeige am Bildschirm stoppt die Ausgabe automatisch 
nach einer Bildschirmseite. Die Leertaste oder Return blättern 
weiter. Mit Control-S kann angehalten und mit Return dann 
wieder geblättert werden. Control-C oder Control-Q bricht die 
Ausgabe völlig ab. 

Wichtig: Ein Datei-Icon bezeichnet nicht unbedingt eine les¬ 

bare, reine Textdatei. Oft handelt es sich um nach¬ 
ladbare Teile von Programmen oder Parameter- 
Listen. Versucht man diese auszudrucken oder an- 
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zuzeigen, kommt meist ein reichlich chaotischer 
Unfug heraus. Die Abbruchfunktion ist dann mög¬ 
licherweise unwirksam - hier hilft nur viel Geduld 
oder der Reset-Knopf. Es gibt auch sogenannte 
Nulldateien - Einträge ohne Inhalt, die lediglich aus 
dem Dateinamen im Directory bestehen. Hier wird 
natürlich nichts angezeigt. 

Das Handbuch des Mega ST gibt zumindest über die elementare 
Bedienung von GEM erschöpfend Auskunft - bei anderen An¬ 
lässen hüllt es sich leider in Schweigen. Interessant ist jedoch: 
Bei gedrückter Shift-Taste können mit der Maus Dateien an be¬ 
liebiger Stelle des Fensters markiert werden und dann beispiels¬ 
weise mit der "Lassofunktion" irgendwohin bewegt werden. Sie 
wissen nicht, was eine Lassofunktion ist? Ganz einfach: Klicken 
Sie einmal abseits aller Icons auf die linke Maustaste und halten 
Sie sie in dieser Position. Bewegen Sie nun die Maus, bis der 
erscheinende gestrichelte Rahmen über eine Reihe von Icons 
reicht. Nachdem Loslassen der Maus sind die Icons im Bereich 
des Rahmens invers dargestellt. Das gilt im Gegensatz zur oben 
beschriebenen Methode mit der Shift-Taste jedoch für sämtliche 
Icons im Bereich des Lassos. Man bezeichnet das "Lasso" auch als 
"Rubberband". Dieses Buch soll nicht das Handbuch ersetzen, das 
mit dem Mega ST geliefert wird. Dort ist recht erschöpfend er¬ 
klärt, wie man mit dem Desktop arbeitet. Dennoch soll nun kurz 
beschrieben werden, wie man Disketten formatiert und kopiert. 


1.2.2 Formatieren, Kopieren und Löschen 

Disketten sind, wenn man sie gerade gekauft hat, noch nicht für 
den Computereinsatz verwendbar, zuerst müssen sie, grob gesagt, 
in "Planquadrate" eingeteilt werden. Nur so kann der Computer 
später eine Information darauf ablegen und auch wiederfinden - 
ähnlich wie in einem Koordinatensystem. Die Position eines Pro¬ 
gramms oder einer Datei auf der Diskette muß genau zu lokali¬ 
sieren sein. Näheres zu diesem Thema finden Sie im Kapitel 3, 
das sich mit der Hardware der Mega-ST-Peripherie befaßt. 
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Formatieren einer Diskette 

Wie formatiert man nun eine Diskette? Legen Sie eine neue Dis¬ 
kette in das Laufwerk Ihres Mega ST. Gehen Sie nun mit dem 
Mauszeiger einfach in das Menü DATEI. Die Option 
"formatiere.." läßt keinen Zweifel an ihrer Funktion: Nach dem 
Anklicken erscheint eine Warnung - das Formatieren einer Dis¬ 
kette löscht alle darauf befindlichen Daten unwiderruflich. 
Fahren Sie dennoch fort (Sie haben doch wirklich eine Leerdis¬ 
kette im Laufwerk?), erscheint eine weitere Dialogbox, die ein 
letztes Mal den Abbruch erlaubt. Sie können nun noch wählen, 
ob Sie ein- oder zweiseitig formatieren wollen. Das bedeutet 
nichts anderes, als daß eine zweiseitige Diskette im Format 720 
KByte, eine einseitige mit 360 KByte formatiert wird. Das 
720er-Laufwerk kann zwar eine einseitige Disk lesen - umge¬ 
kehrt ist das nicht möglich. Dieser Hinweis für den Fall, daß Sie 
ein einseitiges Laufwerk als zweite Floppy nutzen oder Disketten 
kopieren wollen, die einseitig formatiert sind (s.u.). Normaler¬ 
weise werden Sie aus Gründen der Platzersparnis zweiseitig for¬ 
matieren. Nun ist aber auch die beiliegende Language Disk Ihres 
Mega ST einseitig formatiert - klicken Sie also diesmal auf 
einseitig. 

Nach Bestätigung des Formatierbefehls erscheint ein Füllbalken, 
der symbolisiert, wie weit der Formatierprozeß bereits fortge¬ 
schritten ist. Schließlich erscheint wieder die ursprüngliche 
Dialogbox. Sie können nun abbrechen oder eine weitere Diskette 
einlegen und formatieren. 

Wichtig: Die zum Einsatz kommenden Disketten im 3i-Zoll- 

Format haben eine kleine Schreibschutzöffnung. Ein 
kleiner Schieber darin läßt sich mit einem spitzen 
Gegenstand hin- und herschieben. Kann man durch 
die Öffnung hindurchsehen, ist die Diskette schreib¬ 
geschützt - sie kann weder beschrieben noch forma¬ 
tiert werden. Wird der Schieber über die Öffnung 
geschoben, ist der Schreibschutz beseitigt. Bei 
Schreibversuchen auf geschützte Disketten gibt der 
Rechner eine Fehlermeldung aus. 
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Bild 13a: Die Dialogboxen "Formatieren" 



Bild 13b: Diskettenformate wählen 
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Kopieren ganzer Disketten 

Wir wollen nun als erstes die beiliegende Language-Disk des 
Mega ST kopieren. Schützen Sie die Originaldiskette durch Frei¬ 
gabe der Schreibschutzöffnung (siehe oben). Eine wie oben be¬ 
schrieben einseitig formatierte Diskette sollte bereitliegen. 
Fahren Sie nun mit dem Mauszeiger auf das Icon der Floppy A, 
nachdem Sie die Language-Disk in das eingebaute Laufwerk 
gelegt haben. Bei festgehaltener, gedrückter linker Maustaste 
bewegen Sie nun die Maus, bis das Icon A über das Icon B ge¬ 
rät. Man nennt dieses Vorgehen im GEM-Jargon auch 
"Dragging" oder neudeutsch "Draggen". Lassen Sie jetzt die 
Maustaste los - es erscheint eine Dialogbox, die das Kopieren 
von Floppy A nach B ankündigt und Ihnen die Chance gibt, von 
Ihrem Vorhaben abzulassen - ein Kopieren ganzer Disketten 
löscht nämlich alle Daten auf der Zieldiskette. Bestätigen Säe nun 
mit Klicken auf OK - noch einmal besteht nun die Möglichkeit, 
den Kopiervorgang abzubrechen. Tun Sie das nicht, beginnt der 
Formatiervorgang. 

Sofern Sie über ein zweites Laufwerk verfügen, legen Sie die 
Zieldiskette in das Laufwerk B, dieses ist immer das externe, 
zweite Laufwerk, bevor Sie den Kopiervorgang starten. An¬ 
sonsten werden Sie vom Computer aufgefordert, die Zieldiskette 
in Laufwerk A zu legen und dies zu bestätigen. Der Kopiervor¬ 
gang beginnt nun, falls Sie nur ein Laufwerk besitzen: Der Mega 
ST lädt den Inhalt der gesamten Quelldiskette (die Sie kopieren 
möchten) in den RAM-Speicher. Bei anderen ST-Modellen 
reicht der Speicherplatz meist nicht dazu, den gesamten Inhalt 
einer doppelseitigen Diskette zu laden. Dort mußten die Quell- 
und Zieldisketten mehrmals gewechselt werden - der Anwender 
fühlte sich wie ein Diskjockey. Dieses Problem haben Sie beim 
Mega ST nicht. Nachdem der Inhalt der Quelldiskette im RAM 
ist, werden Sie aufgefordert, die Zieldiskette einzulegen. Der 
Quelldisketteninhalt wird nun darauf geschrieben. Schließlich 
fordert Sie der Mega ST auf, wieder die Quelldiskette ins Lauf¬ 
werk zu legen - fertig! 
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Bild 14: Die Dialogbox "Kopieren" 


Kopieren von Dateien 

Sie verfügen nun über eine originalgetreue Kopie der Language 
Disk. Was aber tun, wenn die oben beschriebene Diskettenkopie- 
Funktion nicht funktioniert? Die meisten käuflichen Programme 
werden auf einseitig formatierten Disketten geliefert. Sofern 
diese überhaupt kopierbar sind (manche verfügen über einen 
Kopierschutz), kann dies über die Diskcopy-Funktion nur mit 
einer einseitigen Zieldiskette erfolgen. Das Kopieren der Dateien 
(oder Files) einer einseitigen auf eine doppelseitige Diskette ge¬ 
schieht mit der Filecopy-Funktion. Zu diesem Zweck öffnen Sie 
das Inhaltsverzeichnis einer Diskette durch Doppelklick mit der 
linken Maustaste auf das gewünschte Diskettensymbol. Es er¬ 
scheint das bereits bekannte Fenster mit den Dateisymbolen der 
Files, die auf der im Laufwerk liegenden Diskette sind. 

Bewegen Sie nun den Mauszeiger in die Nähe der zu kopieren¬ 
den Dateien und setzen Sie die Lassofunktion ein, indem Sie den 
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gestrichelten Lassobereich über die zu kopierenden Dateien 
ziehen. Bei gedrückter linker Maustaste können Sie nun die 
invers dargestellten ausgewählten Einträge über das Disketten¬ 
symbol der Zieldiskette oder auf das Fenster eines Verzeichnis¬ 
ses ziehen. Normalerweise werden Sie von A nach B kopieren. 
Wollen Sie lediglich eine einzige Datei kopieren, genügt ein 
einfaches Klicken auf das entsprechende Symbol und nach¬ 
folgendes Draggen wie beschrieben. Bei einem Eindisketten- 
System werden Sie sinnvollerweise immer von A nach B kopie¬ 
ren. Umgekehrt ist auch möglich, Sie müßten dann allerdings die 
Disketten öfter austauschen. Bei einem System mit einer zweiten 
Floppystation spielt es keine Rolle, von wo nach wo Sie kopieren 
- überhaupt erfolgt der Köpiervorgang dann erheblich schneller. 

Wie dem auch sei - der Mega ST läßt Sie nie im unklaren dar¬ 
über, was Sie beim Kopieren, ist es einmal gestartet, zu tun 
haben. Sie werden mittels Dialog- und Alarmboxen (lesen und 
mit Klick auf OK bestätigen) über alles Wichtige informiert. Die 
Floppy B fungiert bei nur einem vorhandenen Laufwerk als 
Pseudofloppy. MS-DOS-Anwender kennen das bereits, wenn ihr 
PC nur ein Floppylaufwerk hat. Das Laufwerk A dient in 
diesem Falle einmal als A, dann wieder als B - um das Disk¬ 
jockey-Feeling kommen Sie also kaum herum. Beschleunigen 
läßt sich das Kopieren bei Eindisketten-Systemen dadurch, daß 
man die Dateien zuerst in eine RAM-Floppy lädt, dann die 
Zieldiskette einlegt und die Dateien aus der RAM-Floppy dar¬ 
auf wieder ablegt. Gleiches läßt sich auch erzielen, indem eine 
Festplatte eingesetzt wird. Das Kopieren auf Festplatte oder 
RAM-Disk und dann von dort auf die Zieldiskette erfolgt genau 
wie bei den Floppylaufwerken beschrieben. Was eine RAM-Disk 
ist und wie sie eingesetzt werden kann, ist weiter unten be¬ 
schrieben. Außerdem finden Sie in diesem Buch ein hervor¬ 
ragendes Programm zur Einrichtung einer RAM-Disk mit er¬ 
staunlichen Fähigkeiten. 

Natürlich lassen sich Dateien auch von einem Unterverzeichnis 
oder der obersten Verzeichnisebene in ein Unterverzeichnis 
kopieren. Wenn Sie den Namen ändern (dazu gibt eine Dialogbox 
Gelegenheit), geht auch eine Kopie innerhalb des aktuellen 
Verzeichnisses. Befindet sich bereits eine Datei gleichen Namens 



48 


Das große Mega-ST-Buch 


in einem Zielverzeichnis oder auf der Zieldiskette, so weist Sie 
der Computer darauf hin - Sie können dann den Namen der 
Kopie ändern. 


Ordner und Dateien löschen 

Manchmal ist es unvermeidbar, eine Datei oder einen ganzen 
Ordner mit seinem Inhalt zu löschen. Dies geschieht, indem Sie 
mit einfachem Klicken (bei einem Objekt) oder der Lasso¬ 
funktion auf das oder die entsprechende(n) Symbol(e) gehen und 
bei gedrückter Maustaste die ausgewählten "Kandidaten" auf das 
im Desktop sichtbare Papierkorb-Icon mit Form einer Mülltonne 
ziehen. Nach Loslassen der Maustaste erscheint eine Dialogbox, 
die anzeigt, wie viele Ordner und Dateien Sie im Begriff sind zu 
löschen. Mit Abbruch könnten Sie nun noch zurück, OK löscht 
die selektierten Dateien und Ordner. 

Wichtig: Eine ganze Diskette können Sie nicht "in den Papier¬ 

korb" werfen. Benutzen Sie die Funktion "forma¬ 
tiere", oder löschen Sie die darauf befindlichen Files 
wie oben beschrieben, nachdem Sie das Verzeichnis 
der Diskette geöffnet haben. 


Der AUTO-Ordner 

Eine besondere Art von Ordner ist der AUTO-Ordner. In 
diesem Verzeichnis abgelegte Programme werden beim Start des 
Rechners sofort geladen und ausgeführt. Nun ist aber leider 
nicht jedes Programm dazu zu verwenden. Beachten Sie die 
Hinweise des Herstellers eines Programmes, wenn Sie es in den 
AUTO-Ordner kopieren wollen. Ein Beispiel für ein automatisch 
ladbares Programm ist z.B. Gdos.PRG. 


1.2.3 Die Desk-Accessories 

Accessories, erkennbar an der Extension .ACC, sind Anwendun¬ 
gen, die die unter GEM beschränkten Multitasking-Fähigkeiten 
des Mega ST ausnutzen. Multitasking bedeutet, daß ein Rechner 
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mehrere Anwendungen (Tasks) praktisch zur gleichen Zeit aus¬ 
führen kann. Bis zu sechs sogenannter Desk-Accessorys kann der 
Mega ST gleichzeitig laden. Beim Booten des Systems werden 
diese Anwendungen automatisch von einer im Laufwerk A be¬ 
findlichen Diskette geladen. Sie stehen nun ständig, unabhängig 
vom gerade laufenden Programm, zur Verfügung. 

Haben Sie eine Festplatte, so können Sie die Accessorys auch im 
Hauptverzeichnis der Partition C der Platte ablegen. Sollte dann 
auf der Diskette in Laufwerk A kein Accessory zu finden sein, 
werden sie von der Festplatte geladen. Verfügt die Festplatte 
über die Fähigkeit, selbst zu booten, werden generell nur die 
Accessorys von Partition C geladen. Von Atari werden zwei 
Accessorys auf der Language-Disk bzw. der Bootdisk SH für die 
Festplatte mitgeliefert: CONTROL.ACC und EMULATOR.ACC. 
Insgesamt stellen diese Accessorys vier Anwendungen zur Ver¬ 
fügung: den VT52-Emulator, das Kontrollfeld, die RS232-Ein- 
stellung und die Druckeranpassung. Wie man diese Anwendun¬ 
gen einsetzt, lesen Sie bitte in den folgenden Kapiteln bzw. Ab¬ 
schnitten nach: "Der Mega ST und die Außenwelt" sowie "Die 
Hardware des Mega ST". 

Maximal können sechs Anwendungen als Accessory geladen 
werden. Mehr ist nicht möglich. Die geladenen Accessorys 
stehen dann im Rollmenü DESK zur Verfügung. Übrigens kön¬ 
nen einzelne Accessorys auch mehrere Anwendungen beinhalten. 
Mehr als sechs sind allerdings dennoch nicht möglich, da einfach 
nicht mehr ins Rollmenü passen. Auch bei den Accessorys gilt: 
Sie können nicht einfach irgendein Programm mit der 
EXTENSION .ACC versehen und hoffen, daß es dann als 
solches akzeptiert wird. Accessorys müssen vom Programm her 
für diesen Zweck vorbereitet werden. Gestartet werden alle Ac- 
cessories, indem Sie mit dem Mauszeiger in das Rollmenü DESK 
fahren und das gewünschte Accessory mit Doppelklick starten. 
Nach Beendigung der Arbeit mit dem Accessory sollte der Com¬ 
puter ohne Probleme in eine gerade aktive Anwendung zurück¬ 
kehren. Manchmal gibt es hier Konflikte. 
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1.2.4 Die RAM-Disk 

Ihr Mega ST hat eine Menge Speicherplatz zu bieten, ob dieser 
nun zwei oder vier MByte beträgt. Diese Speicherkapazität 
schreit förmlich nach einer RAM-Disk. Eine RAM-Disk ist ein 
reservierter Bereich des RAM, der von einem speziellen Pro¬ 
gramm eingerichtet werden kann. Nach Installation eines Disk- 
Icons, wie bei den Diskettenstationen und Festplattenpartitionen 
beschrieben, kann dieser Bereich dann wie eine Floppystation 
beschrieben und gelesen werden. Sogar Programme lassen sich 
ohne Probleme in die RAM-Disk kopieren und von dort starten. 
Alle Aktionen mit der RAM-Disk laufen erheblich schneller ab, 
als von einem physikalischen Laufwerk her gewohnt. Der Nach¬ 
teil: Fällt der Strom aus, ist auch der Inhalt der RAM-Disk 
dahin. Eine residente RAM-Disk kann zumindest bei einem 
Systemabsturz mit folgendem Reset helfen, ansonsten sollten Sie 
die wichtigsten Daten in einer RAM-Disk von Zeit zu Zeit auf 
Diskette sichern. 


1.2.5 Die Funktionen der Desktop-Menüs 

Einige Funktionen der Desktop-Rollmenüs haben Sie bereits 
kennengelernt. Hier nun noch einmal eine Zusammenfassung, in 
der Sie auch die noch nicht besprochenen Funktionen finden. 
Manche Funktionen sind erst dann zu verwenden, wenn zuvor 
bestimmte Aktionen, beispielsweise das Öffnen eines Disketten¬ 
verzeichnisses, erfolgt sind. Das ist nur logisch, wenn eine 
Funktion z.B. auf eine bestimmte Datei angewendet werden soll, 
die man ja erst auswählen und anklicken bzw. markieren muß. 
Solche Funktionen erscheinen im Rollmenü in heller Schrift, so¬ 
lange sie nicht verwendet werden können. 


DESK 

enthält die Funktion "Desktop Info..." sowie alle eventuell vor¬ 
handenen Desktop-Accessorys. In jedem Falle sollten Accessorys 
wie Druckeranpassung, RS232-Konfiguration (beide sind bei 
neueren Versionen der Atari-Software im Kontrollfeld inte¬ 
griert), VT52-Emulator und das Kontrollfeld vorhanden sein. 
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Diese werden ja von Atari mitgeliefert. Die Funktion dieser 
Accessorys wird im Zusammenhang mit dem jeweiligen 
Anwendungsbereich erläutert, zum Kontrollfeld jedoch bereits 
jetzt einige Bemerkungen. 

Das Kontrollfeld erscheint als komplexe Eingabebox auf dem 
Bildschirm. Die meisten Eingabemöglichkeiten erklären sich von 
selbst. So läßt sich die Klickgeschwindigkeit der Maus beein¬ 
flussen, gleiches gilt für die Dauer eines Tastendruckes, bis eine 
Reaktion des Rechners eintritt. Mit Return oder Klicken auf das 
Feld NEUSTART werden alle Änderungen verworfen, und die 
zuletzt mit "Arbeit sichern" abgelegten Daten werden wieder 
eingestellt. Verlassen Sie das Kontrollfeld durch Klicken auf die 
links oben befindliche Close-Box, gelten die Änderungen für die 
weitere Arbeit - Sie können sie zusammen mit den anderen 
Desktop-Daten mit "Arbeit sichern" auf Dauer speichern. Mit 
dem Kontrollfeld können Sie auch die Hardware-Uhr des Mega 
ST einstellen. Klicken Sie einfach in die entsprechenden Felder 
für Uhrzeit und Datum, und tippen Sie die korrekten Daten ein. 
Die Uhr arbeitet mit einer 24-Stunden-Einstellung. 

DESK DATEI INDEX EXTRAS 



Bild 15: Das Kontrollfeld von GEM 

























52 


Das große Mega-ST-Buch 


"Desktop Info..." 

Zeigt Ihnen die aktuelle Version Ihres 
Betriebssystems bzw. des GEM an. In 
der Regel erscheint bei Einsatz ir¬ 
gendeines Programms eine ent¬ 
sprechende Information über die Au¬ 
toren, die Programmversion usw. 
Normalerweise wird die Funktion mit 
einem bestätigenden Klicken auf das 
Feld OK beendet. 

DATEI 



Dieses Rollmenü enthält wichtige Funktionen für den Umgang 
mit Ihren Dateien bzw. das Formatieren neuer Disketten. 


"öffne" 

Wirkt auf zuvor angeklickte Einträge 
des Diskettenverzeichnisses. Die 

Funktion entspricht dem Doppelklick. 
Bei Ordnern wird deren Inhalt ange¬ 
zeigt, Programme werden gestartet, 
und Dateien werden auf Wunsch an¬ 
gezeigt oder gedruckt. 

"zeige Info.." 

Gibt Auskunft über die Daten eines 
zuvor markierten Objekts, also Pro¬ 
gramm, Datei oder Ordner. 


Nach Anwendung der Funktion auf Dateien oder Programme 
kann der Anwender den Namen frei verändern. Nach Anklicken 
von OK wird die Datei mit verändertem Namen auf die Diskette 
oder Festplatte geschrieben. Des weiteren kann eine Datei oder 
ein Programm mit "nur lesen" geschützt werden. Ein Schreibzu¬ 
griff ist dann erst wieder möglich, wenn durch erneute An¬ 
wendung von "zeige Info.." und Anklicken von "lesen/schreiben" 
der Schutz aufgehoben wird. Ordner können zwar ebenfalls mit 
"zeige Info.." untersucht werden. Eine Veränderung der Ordner- 
Attribute ist aber nicht möglich. 
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1335 Bytes in 2 Dateien 


DISKSTOTION 


lane: LIESMICH.L. 

Ites: _1335 

von: 02/02/88 16:53 


Merknal 


lesen/schreiben 


DESK Effigfl INDEX EXTRAS 
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Bild 16: "zeige Info..", angewendet auf eine Textdatei 


Wichtig: Verändern Sie niemals die Attribute einer Datei, 

wenn Sie nicht genau wissen, was Sie damit be¬ 
zwecken und welches Verhalten Sie von der ge¬ 
änderten Datei erwarten. Oft ist ein Programm z.B. 
nach Änderung der Attribute "Namen" oder "Zu¬ 
griffsmöglichkeit" nicht mehr lauffähig. 

"Neuer Ordner" Erlaubt Ihnen, ein neues Unterver¬ 

zeichnis, einen Ordner, anzulegen. Sie 
müssen lediglich den Namen angeben 
und diese Wahl bestätigen. Ein leerer 
Ordner wird erstellt, ein entsprechen¬ 
des Icon mit dem Ordner-Namen er¬ 
scheint nach OK-Klick auf dem 
Desktop-Fenster. 
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"Schließe" und 
"schließe Fenster" 

Machen genau das, was ihre Namen 
erwarten lassen - diese Funktionen 
schließen geöffnete Fenster des GEM- 
Desktops bzw. wechseln die Ver¬ 

zeichnisebene "schließe" geht der 
Reihe nach vor: Arbeiten Sie gerade 
in einem Unterverzeichnis, erscheint 
nach Ausführung ein Fenster mit der 
nächsthöheren Verzeichnisebene, ar¬ 
beiten Sie bereits dort, wird das Fen¬ 
ster geschlossen, "schließe Fenster" 
schließt das aktive Fenster in jedem 
Falle, gleich, in welchem Unterver¬ 
zeichnis Sie arbeiten 

"formatiere.." 

Kennen Sie bereits - mit dieser Funk¬ 
tion können Sie eine Diskette forma¬ 
tieren und so für den Betrieb mit dem 
Mega ST vorbereiten. Die Funktion 
wurde bereits ausführlich erläutert. 

INDEX 



Die Art der Darstellung des Inhaltes Ihrer Disketten bzw. der 
Festplatte kann mit den hier vorhandenen Funktionen beeinflußt 
werden. 


"als Bilder" 

Liefert die bekannte Darstellung des 
Disketteninhaltes in Form von Icons. 

"als Text" 

Zeigt keine Icons, sondern eine Liste 
der vorhandenen Dateien und Ordner. 
Im Gegensatz zur Icon-Darstellung 
werden auch die Dateigröße und das 
Erstellungsdatum angezeigt. Die Sor¬ 
tierung der Liste kann mit den rest¬ 
lichen Funktionen von INDEX be¬ 
stimmt werden: 
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"ordne Namen" 

Sortiert alphabetisch nach den ersten 
Zeichen des Dateinamens in auf- 
steigender Reihenfolge. 

"ordne Datum" 

Sortiert nach dem Erstellungsdatum 
absteigend vom letzten Eintrag, Ord¬ 
ner und Dateien werden separat ge¬ 
ordnet. 

"ordne Größe" 

Sortiert die Liste der Einträge vom 
größten Eintrag absteigend. Auch hier 
werden die Ordner getrennt behandelt. 

"ordne Art" 

Schließlich ordnet nach dem Typ des 
Eintrags. Auch hier werden wieder die 
Ordner vorangestellt. Die Reihenfolge 
der übrigen Einträge erfolgt alphabe¬ 
tisch aufsteigend entsprechend der 
Extension (z.B. .ACC) eines Eintrags. 


EXTRAS 

Das vierte Rollmenü enthält nochmals sehr wichtige Funktionen. 
Eigentlich keine "Extras", sondern unentbehrliche Hilfen für die 
Arbeit mit dem Mega ST. 


"Floppy anmelden." 

Erlaubt die Erstellung weiterer Icons 
für Diskettenstationen, Festplatten¬ 
partitionen und RAM-Disks. Außer¬ 
dem kann der Name eines solchen 
Icons geändert werden. Nach Bestäti¬ 
gung mit OK erscheint das neue Icon 
auf dem Bildschirm. Benutzt werden 
kann es allerdings nur, wenn durch 
Partitionieren, Erstellung einer RAM- 
Disk usw. auch tatsächlich eine Basis 
geschaffen wurde. Ansonsten erscheint 
eine Fehlermeldung: "Floppy mit 
dieser Kennung unbekannt". Beim 
Sichern der Arbeit werden auch neu 
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"Anwendung anmelden" 


"Voreinstellung.." 


"Arbeit sichern" 


definierte Laufwerke etc. für die 
weitere Arbeit und zukünftige An¬ 
wendung gesichert. 

Erlaubt es, bestimmte Dateien einer 
bestimmten Anwendung zuzuordnen, 
z.B. Textdateien einem Textprogramm. 
Zu diesem Zweck kann man z.B. ein¬ 
mal auf das Icon eines Textprogram¬ 
mes klicken und es so markieren. 
Nach Aufruf von "Anwendung an¬ 
melden" können dem Programm alle 
Dateien mit der Extension .TXT zuge¬ 
ordnet werden. Wird nun doppelt auf 
ein Textdatei-Symbol geklickt, startet 
das Textprogramm sofort unter Laden 
der gewünschten Datei. 

Haben wir ebenfalls schon kennenge¬ 
lernt. Hier können Sie festlegen, ob 
der Mega ST Sie mit einer Bestätigung 
vor Lösch- und Kopiervorgängen 
versorgt. Außerdem kann hier die 
Bildschirmauflösung eingestellt wer¬ 
den. Bei einem Farbmonitor besteht 
die Wahl zwischen niedriger und 
mittlerer Auflösung, bei einem 
Monochrom-Bildschirm steht lediglich 
die hohe Auflösung zur Verfügung. 

Ist eine der wenigen neuen Optionen 
im Desktop. Diese Funktion gibt es 
bei älteren TOS-Versionen nicht in 
dieser Form. Jetzt wird der Anwender 
gefragt, ob er die Arbeit, also alle 
Einstellungen und den optischen Auf¬ 
bau des Desktop für zukünftige Ar¬ 
beiten sichern will. Die Funktion er¬ 
zeugt eine Datei namens Desktop.Inf. 
Diese enthält Informationen über die 
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gesamte Arbeitsumgebung, wie sie von 
Ihnen eingestellt wurde. 

DESKTOP.INF muß sich auf Partition 
C der Festplatte bzw. auf der Diskette 
befinden, die beim Booten in Lauf¬ 
werk A befindlich ist. Ein 
DESKTOP.INF können Sie sich mit 
"Anzeigen" ansehen. Theoretisch kann 
DESKTOP.INF auch mit einem Edi¬ 
tor/Textsystem verändert werden, 
davon sollten Sie jedoch zuerst einmal 
absehen. 
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Bild 17: 

Beispiel für eine Desktop.INF-Datei 
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"Hardcopy" Erstellt eine Kopie des Bildschirmin¬ 

haltes auf einem angeschlossenen 
Drucker. Grundsätzlich funktioniert 
das jedoch nur mit einem zum Epson 
FX-80/85 bzw. Epson FX800 kompa¬ 
tiblen Drucker. Wenn Sie einen ande¬ 
ren Drucker haben, benötigen Sie be¬ 
sondere Software zur Erstellung von 
Hardcopys. Auch die Funktion 
"Hardcopy" ist jetzt mit einer Sicher¬ 
heitsabfrage ausgestattet. 

"Blitter" Bezeichnet sicher die wichtigste 

Neuerung beim Mega ST. Einfaches 
Klicken auf diese Option bewirkt ein 
Ein- oder Ausschalten des Spezial¬ 
chips Blitter. Dies ist dann sinnvoll, 
wenn ein Programm bei eingeschalte¬ 
tem Blitter nicht mehr ordnungsgemäß 
funktioniert. 


1.3 Der Mega ST und die Festplatte SH205 

Wir haben bereits davon gehört, wie man die Festplatte an den 
Mega ST anschließt. Bisher haben wir die Festplatte allerdings 
ausgeschaltet gelassen, damit sich der GEM-Einsteiger, ein 
solcher sind Sie ja vielleicht, erst einmal mit dieser Benutzer¬ 
oberfläche vertraut machen konnte. Jetzt wollen wir die Fest¬ 
platte aus ihrem Dornröschenschlaf wecken und sehen, was man 
damit alles anfangen kann. Starten Sie dazu Ihren Mega ST in 
folgender Reihenfolge: 

1. Legen Sie die dem Karton mit der Harddisk beiliegende 
Diskette Boot Disk bzw. "SH" in das Laufwerk des Mega 
ST. Verwenden Sie bei Verwendung einer Festplatte nicht 
die Language Disk zum Starten. 

2. Schalten Sie den Drucker ein, falls vorhanden (näheres 
zum Anschließen von Druckern in Kapitel 3). 
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3. Schalter an der Rückseite der Festplatte(n) auf "I" stellen.. 

4. Warten, bis die linke(n) Kontrolleuchte(n) der Festplatte(n) 
nicht mehr leuchtet. 

5. Schalten Sie den Monitor ein (Volume nach unten drehen) 
sowie eine eventuell vorhandene zweite Floppystation. 

6. Schalten Sie den Mega ST ein, indem Sie den Schalter an 
der Rückseite des Gehäuses auf "I" stellen. 

Wenn Sie sich erlauben konnten, gleich mehrere Festplatten zu 
erstehen, verbinden Sie zuvor jeweils "Harddisk In" mit "Hard¬ 
disk Out" der zuvor angeschlossenen Festplatte (siehe Abbil¬ 
dung). Es können bis zu acht Festplatten gleichzeitig ange¬ 
schlossen werden. 


Ha r ddisk Ha rddisk 
Zn Out 


HarddisK 
In 


HarddisK 
Out 


Heitere Festplatten 



Anschlüssehena Mega ST und F«stplatt«(n) 

Bild 18: Anschließen der Festplatte(n) 


Es erscheint nun auf dem Bildschirm das bereits erwähnte 
Desktop (was nichts anderes bedeutet als Schreibtisch). Haben 
Sie die Festplatte richtig angeschlossen, erscheint unter den 
Sinnbildern der Floppys A und B ein weiteres Icon mit der Be¬ 
zeichnung C und Festplatte. 
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Anschluß fremder Festplatten 

Einige Hersteller bieten alternativ zu den Atari-Festplatten 
eigene Lösungen an. Unter anderem gibt es solche mit einer 
Kapazität von bis zu 60 MByte. Der Anschluß macht in der 
Regel keine besonderen Schwierigkeiten. Leider sind solche 
Laufwerke recht teuer. Es ist sicher sinnvoller, eine große Platte 
zu installieren als mehrere Original-Festplatten zu stapeln. Auf 
die Arbeit mit Fremdlaufwerken können wir in diesem Buch 
natürlich nicht weiter eingehen. Lesen Sie in diesem Falle die 
Handbücher der Anbieter. 



Bild 19: 20-MByte-Festplatte von Vortex 
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1.3.1 Festplatte vorbereiten 

Bevor Sie mit der Festplatte arbeiten können, muß diese vorbe¬ 
reitet werden. Tun Sie das nicht, erkennt der Mega ST erst gar 
nicht, daß er eine zur Verfügung hat. Was müssen Sie tun? Eine 
neue Festplatte wird vorbereitet, indem man sie zuerst formatiert 
und dann partitioniert. Für den Fall, daß diese Begriffe Ihnen 
wie die böhmischen Dörfer Vorkommen, hier eine kurze 
Erläuterung. 


Formatieren 

Hierunter versteht man die Einteilung der Festplatte in 
definierte Bereiche, so daß es möglich ist, Daten darauf 
wiederzufinden. 


Partitionierung 

Beim Partitionieren wird eine formatierte Festplatte in soge¬ 
nannte logische Laufwerke eingeteilt. Das bedeutet nichts 
anderes, als daß die gesamte Festplattenkapazität auf vier ge¬ 
trennte Bereiche verteilt wird. Diese separaten Bereiche werden 
dann vom Computer wie zusätzliche Diskettenlaufwerke be¬ 
trachtet bzw. behandelt. Richtet man keine Partitionen ein, wird 
die gesamte Festplattenkapazität wie ein Laufwerk behandelt. 

Wie Sie Ihre Fesplatte formatieren und partitionieren, erläutern 
wir im folgenden Abschnitt. 


Die Festplatten-Hilfsprogramme 

Der Karton, in dem Ihre neue Festplatte geliefert wurde, enthält 
eine Diskette mit dem Logo "SH" sowie der Bezeichnung Boot 
Disk. Auf dieser Diskette befinden sich bei der SH205 die fol¬ 
genden Dateien: 

1. Der Ordner AUTO\ enthält den Harddisk-Treiber 
AHDI.PRG. Ohne dieses Programm wird die Harddisk 
nicht initialisiert. Beim Starten Ihres Systems muß sich 
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diese Diskette oder eine Arbeitskopie davon im Laufwerk 
des Mega ST befinden. AHDI.PRG wird dann automatisch 
geladen. 

2. Das Programm HDX.PRG dient zum Formatieren und 
Partitionieren der Festplatte. 

3. Wincap ist nichts weiter als eine Textdatei, die zum Pro¬ 
gramm HDX.PRG gehört. HDX.RSC gehört ebenfalls zu 
HDX.PRG und enthält GEM-Hilfsdaten. 

4. SHIP.PRG ist ein Programm, mit dem Sie den Schreib-/ 
Lesekopf Ihrer Festplatte in eine Zone der Fesplatten- 
oberfläche bewegen können, in der er beim Transport der 
Platte geschützt ist. 

5. HINSTALL.PRG und HINSTALL.RSC schließlich dienen 
dazu, die Festplatte "autobootfähig" zu machen. Wenn Sie 
dieses Programm anwenden, benötigen Sie beim Starten des 
Systems keine Systemdiskette in Laufwerk A mehr. 
HINSTALL.PRG legt eine Datei namens SH204DVR.SYS 
auf Partition C Ihrer Festplatte an. 

Es befinden sich auf der SH-Diskette noch weitere Programme. 

Allerdings bisher ohne Dokumentation. Da diese Programme sehr 

wichtig sein können, wollen wir sie hier kurz besprechen. 

1. FOLDRIOO.PRG dient dazu, mehr als die maximal korrekt 
vom System erkannten 40 Unterverzeichnisse anzulegen. 
Zu diesem Zweck reserviert das Programm 12 KByte 
Speicher je 100 Ordner-/Unterverzeichnisse. Sie können 
FOLDRIOO.PRG auch mit "zeige Info.." umbenennen, z.B. 
in FOLDR200.PRG. Nach dem Aufruf reserviert das Pro¬ 
gramm dann Platz für maximal 200 Ordner usw. Das Pro¬ 
gramm muß in den Ordner AUTO\ kopiert werden, so daß 
es bei jedem Booten ausgeführt wird. 

2. DIRSLEFT.PRG bzw. DIRSLEFT.TOS zeigt Ihnen, wieviel 
Speicherplatz noch für weitere Ordner zur Verfügung 
steht. 
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Partitionieren und Formatieren 

Mit einem Doppelklick auf das Icon A öffnen Sie das Verzeich¬ 
nis der Boot-Diskette. Sie sollten zuvor eine Kopie dieser Dis¬ 
kette herstellen. Beachten Sie dazu die Hinweise unter Forma¬ 
tieren und Kopieren. Klicken Sie nun auf das Icon Hdx.PRG, 
und starten Sie auf diese Weise das Programm. Es erscheint ein 
leerer Bildschirm mit einer kleinen Menüauswahl. Fahren Sie mit 
dem Mauszeiger daran entlang - die folgenden Optionen stehen 
zur Verfügung: 

Desk "ABOUT HDX..." zeigt beim Anklicken eine 

Information zum Programm Hdx.PRG. 

File "Quit": Mit dieser Option wird das Programm 

beendet. 

Disk "Format" dient zum Formatieren, "Partition" zum 

Partitionieren, "Zero" dient dem Löschen von 
Partitionierungen und "Markbad" kann zur Mar¬ 
kierung und Sperrung defekter Festplattenbereiche 
verwendet werden. 

Klicken Sie nun auf "Format" im Rollmenü DISK. Es erscheint 
die folgende Warnung: 
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Bild 20: Letzte Warnung vor dem Formatieren 


Bedenken Sie: Wenn sich auf Ihrer Festplatte noch Daten be¬ 
finden, so werden diese beim Formatieren unwiderruflich ge¬ 
löscht. Klicken Sie nun auf OK, es erscheint die folgende Box: 
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Bild 21: Auswahl der zu formatierenden Festplatte(n) 


Alle mit Schatten dargestellten Einheiten (Units) können nun 
formatiert werden. Die erste angeschlossene Festplatte ist immer 
UNIT 0. Sie können nun die Festplatte formatieren, indem Sie 
auf die gewählte Einheit klicken und mit OK bestätigen. Bei der 
zur Zeit ausgelieferten Version von HDX.PRG fragt das System 
noch nach der Disk-Type. Klicken Sie auf SH204, eine SH205 
scheint bei Atari nicht bekannt zu sein. Im Ernst: SH204 und 
SH205 unterscheiden sich nicht in der Technik, lediglich das 
Gehäuse und die durchgeschleifte DMA-Schnittstelle stellen 
Unterschiede dar. 

Bestätigen Sie jetzt mit OK, nochmals erhalten Sie jetzt Gele¬ 
genheit, den Formatiervorgang abzubrechen, klicken Sie auf Yes, 
geht es los. Es dauert nun einige Minuten, bis die Festplatte 
formatiert ist. Diese Wartezeit sollten Sie geduldig ertragen - mit 
schnellem Zugriff und viel Speicherplatz wird es Ihnen die Fest¬ 
platte später lohnen. 
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Wir wollen nun die Festplatte partitionieren. Vielleicht begnügen 
Sie sich aber auch mit einer einzigen Partition, belassen es also 
bei C für die Festplatte und verwalten somit den gesamten 
Speicherplatz von rund 20 MByte als ein Laufwerk. Leider kön¬ 
nen Sie in diesem Falle nur auf 16 MByte der Kapazität zu¬ 
greifen. Die Option "Partition" benötigen Sie dennoch. 

Das Programm HDX legt beim Formatieren automatisch drei 
Partitionen an, die mit den folgenden Kapazitäten belegt sind: 

Partition C: 4.3 MByte 

Partition D: 6.0 MByte 

Partition E: 10.0 MByte 

Klicken Sie nun auf die Option "Partition", und es erscheint eine 
Dialogbox: 



Bild 22: Die Auswahlbox zur Partitionsgröße 
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Die Dialogbox enthält ein Feld namens "Menu". Klicken Sie auf 
dieses Feld, dann erscheint eine weitere Box, die Ihnen die 
Möglichkeit gibt, vordefinierte Partitionen auszuwählen. Ver¬ 
zichten Sie darauf, können Sie in der ersten Dialogbox durch 
Mausklicken auf die Pfeilboxen die Größe der Partitionen fest¬ 
legen. Maximal können vier Partitionen je Festplatte definiert 
werden. Bestätigen Sie die Wahl der Partitionen durch ein 
Klicken auf OK. Nach einer letzten Sicherheitsabfrage erfolgt 
die Partitionierung. 

Wichtig: Auch beim Partitionieren werden alle Daten auf der 

Festplatte gelöscht. Wenn Sie eigene Partitionsgrößen 
festlegen, kann es angeblich geschehen, daß unvor¬ 
hergesehen Abstürze auftreten. Bei unserer Arbeit 
mit dem Mega ST und der Festplatte ist das bisher 
noch nicht vorgekommen. 


Installation der Partitionen 

Bevor Sie eine Partition benutzen können, müssen Sie die 
logischen Laufwerke dem Desktop mitteilen. Dies geschieht mit 
der Funktion "Floppy anmelden.." im Rollmenü EXTRAS. 
Fahren Sie mit dem Mauszeiger in dieses Rollmenü, und klicken 
Sie auf diese Option, nachdem Sie zuvor einmal kurz auf das 
Icon C geklickt haben. Es erscheint eine Box, in der Sie nun 
nacheinander die logischen Laufwerke angeben können. Klicken 
Sie auf das Feld mit dem "C", tragen Sie hier nun ein "D" ein, 
klicken Sie auf OK, und es erscheint ein weiteres Icon im 
Desktop, das mit "D" bezeichnet ist. Verfahren Sie wie hier be¬ 
schrieben mit "E", "F" usw., bis Sie so viele Icons installiert 
haben, wie Sie auf allen Festplatten Partitionen angelegt haben. 
Klicken Sie jetzt auf die Option "Arbeit sichern.." im Rollmenü 
EXTRAS, beantworten Sie die folgende Abfragebox mit OK. 
Das System speichert nun das File namens DESKTOP.INF mit 
allen Informationen zum aktuellen Desktop auf der Systemdis¬ 
kette ab. Booten Sie das System nun, dann erscheinen die ge¬ 
wählten Partitionen ab "C" auf dem Desktop. Sie können dieses 
Icons verwenden wie normale Diskettenlaufwerke. 
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Wichtig: Installieren Sie keine weiteren Icons neben C, kön¬ 

nen Sie auf die anderen Partitionen nicht zugreifen. 
Eine Installation weiterer logischer Laufwerke kann 
aber schon aus Gründen der Übersichtlichkeit sehr 
nützlich sein. 


Löschen von Partitionen 

Mit "Zero" im Menü DISK des Programms HDX können Sie eine 
Partition löschen. Es erscheinen ähnliche Dialogboxen wie beim 
Partitionieren beschrieben. Das Löschen einer Partition löscht 
sämtliche darin befindlichen Daten. 


Transport der Festplatte 

Wenn Sie die Festplatte versenden oder transportieren wollen, 
sollten Sie das Programm SHIP.PRG anklicken. Der Lesekopf der 
Festplatte wird dann in einen Bereich der Festplatte befördert, 
in dem eine Beschädigung relativ unwahrscheinlich ist. 


1.3.2 Adressierung mehrerer Festplatten 

Wenn Sie mehr als eine Festplatte verwenden, müssen sogenannte 
DIP-Schalter im Inneren der Festplatten verstellt werden. Das 
gleiche gilt für den Laserdrucker - wie die Festplatten so ist 
auch er ein DMA-Device, also über die Schnittstelle Harddisk 
angeschlossen. Im Inneren des Laserdrucker-Interfaces SLMC804 
sowie in den Festplatten selbst finden sich nach dem Öffnen der 
Gehäuse (das verletzt in diesem Falle nicht die Garantie) kleine 
Schalter, die sich mit einem spitzen Gegenstand auf ON oder 
OFF stellen lassen. Die folgende Tabelle zeigt Ihnen, wie diese 
Schalter einzustellen sind. Beachten Sie dabei: Der Laserdrucker 
sollte immer auf die Nummer 7 eingestellt werden, ein zweiter 
Laserdrucker auf 6. Nach Einrichtung eines Laserdruckers kön¬ 
nen nur noch sieben Festplatten bzw. sonstige DMA-Geräte in¬ 
stalliert werden. Die zu verstellenden Schalter sind mit 1, 2 und 
4 bezeichnet. Diese Zahlen finden sich auf der Platine, nicht auf 
dem Schaltkästchen der DIP-Schalter. 
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Die Verstellung der DIP-Schalter in einem Gerät ergibt die fol¬ 
genden Adressen für dieses DMA-Gerät: 


Adresse 

DIP 1 

DIP 2 

DIP 4 

0 

ein 

ein 

ein 

1 

ein 

ein 

aus 

2 

ein 

aus 

ein 

3 

ein 

aus 

aus 

4 

aus 

ein 

ein 

5 

aus 

ein 

aus 

6 

aus 

aus 

ein 

7 

aus 

aus 

aus 


Wichtig: Überspringen Sie niemals eine Adresse bei Adres¬ 

sierung Ihrer Festplatten. Die Adresse des Laser¬ 
druckers kann aber auf 7 stehenbleiben. Die Nor¬ 
maleinstellung bei Verwendung eines Laserdruckers 
und/oder einer Harddisk ist 0 für die Platte und 7 
für den Laserdrucker. Diese Einstellung ist vom 
Werk bereits vorgenommen worden. Sie müssen also 
nichts verändern. 


1.3.3 Booten von der Festplatte aus 

Mit dem Programm HINSTALL.PRG können Sie dafür sorgen, 
daß Ihre Festplatte ohne Systemdisk in Laufwerk A bootfähig 
wird. Alle Accessorys und das DESKTOP.INF werden dann in 
jedem Falle von der Partition C der Festplatte geladen. Klicken 
Sie einfach auf das Icon Hinstall.PRG, und bestätigen Sie die 
folgende Dialogbox mit OK. Dieses Programm wird nicht mit 
jeder Festplatte geliefert. Wenden Sie sich an Ihren Fachhändler, 
falls HINSTALL.PRG nicht auf Ihrer Festplatten-Systemdiskette 
ist. 

Wichtig: Es kann geschehen, daß Sie irgend etwas, z.B. ein 

funktionsunfähiges Accessory, in der Partition C an¬ 
gelegt haben, was dafür sorgt, daß die Festplatte, 
wenn sie autobootfähig ist, nicht mehr korrekt 
initialisiert. Sie können sie dennoch wieder erreichen. 
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wenn Sie wie folgt vorgehen: Schalten Sie die Fest¬ 
platte aus. Starten Sie nun den Mega ST wie oben 
beschrieben ohne Festplatte. Schalten Sie jetzt auch 
die Festplatte ein, legen Sie die Boot Disk in das 
Laufwerk, und starten Sie dann das Programm 
AHDI.PRG im Ordner AUTO, indem Sie den Ordner 
durch Doppelklick öffnen und auf das Icon 
AHDI.PRG klicken. Ahdi startet und gibt manchmal 
eine Fehlermeldung bezüglich eines illegalen ROM- 
Releases von sich. Ignorieren Sie das. Installieren Sie 
mit "Floppy anmelden.." Ihre Partitions-Icons, wie es 
oben beschrieben wurde - fertig. Löschen Sie nun, 
falls bekannt, den Eintrag im AUTO-Ordner der 
Partition C oder das Accessory, welches für das 
Nichtfunktionieren der Platte vermutlich verantwort¬ 
lich war. Sie können die Platte dann wieder wie ge¬ 
wohnt starten. 


1.3.4 Kopieren und Backup 

Sie können Dateien jederzeit auch auf eine Festplatte kopieren. 
Verfahren Sie dazu, wie oben beschrieben, unter Verwendung 
der Partitions-Icons der Festplatte oder des Inhaltsfensters einer 
Partition oder eines Unterverzeichnisses. Die Diskcopy-Funktion 
läßt sich auf die Festplatte nicht anwenden - auch nicht auf eine 
RAM-Disk. 

Wichtig: Wenn Sie Anwenderprogramme auf die Festplatte 

kopieren, kann es sein, daß sie von dort nicht mehr 
lauffähig sind oder fehlerhaft arbeiten. Dies liegt 
meist daran, daß solche Programme entweder einen 
Kopierschutz haben, der die Originaldiskette in 
Laufwerk A erwartet, oder daß das Programm nur 
auf die Laufwerke A oder B zugreifen kann. Fragen 
Sie in diesem Falle beim Hersteller nach - auch 
wenn das in der Regel nicht viel bringt. Die 
wichtigsten Standardanwendungen funktionieren 
auch mit Festplatte. 
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Backup der Festplatte 

Von Zeit zu Zeit sollten Sie eine Sicherheitskopie der Festplatte 
erstellen. Entweder müssen Sie dazu mit der oben beschriebenen 
Prozedur alle Einträge der Festplatte auf Disketten kopieren. 
Dies ist recht mühselig. Oder Sie verwenden ein handelsübliches 
Backup-Programm. Hiermit funktioniert das Kopieren weitaus 
schneller, außerdem werden keine Dateien übersehen. Mit ent¬ 
sprechendem finanziellen Aufwand können Sie sich auch ein 
komplettes Backup-System besorgen. Ein solches besteht meist 
aus einem Magnetband-Laufwerk mit kleinen Bandkassetten. 
Beispiel: Der Rhotron-Streamer der gleichnamigen Firma. Diese 
Systeme sind sicher, aber auch sehr teuer, sie lohnen sich nur 
bei kommerziellem Einsatz des Mega ST. 
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2. Software für den Mega ST 


Auch der Mega ST wäre, trotz all seiner Fähigkeiten, nicht viel 
mehr als eine Ansammlung technischer Delikatessen ohne Sinn - 
gäbe es für ihn keine Software. Erst gute Programme machen 
den Speicherplatzgiganten Mega ST zu einem mächtigen Werk¬ 
zeug für unzählige Anwendungsbereiche. Auf den folgenden 
Seiten wollen wir Sie ein wenig durch den Dschungel führen, 
den das derzeitige Angebot an Software für Atari-ST-Computer 
darstellt. Dabei gehen wir natürlich auch auf Probleme ein, die 
der Mega ST mit so manchem Programm hat, das auf seinen 
Vorgängern in der ST-Reihe klaglos arbeitete. Der Grund liegt 
meist im neu konzipierten Betriebssystem TOS. Aber Software, 
die Probleme mit dem neuen ST hat, wird immer seltener, was 
den Anwender natürlich freut. Zu verdanken ist das hauptsäch¬ 
lich der schnellen Reaktion der Programmentwickler. Das kon¬ 
nten die Autoren gewissermassen live miterleben: Das im 
gleichen Verlag wie dieses Buch erschienene Programm 
BECKERtext ST verweigerte regelmäßig den Dienst mit dem 
Mega ST - wenige Tage später schon gehörten die Probleme der 
Vergangenheit an. 

Ähnlich schnell reagierten auch andere Softwarehäuser. Also 
keine Angst - es ist sicher damit zu rechnen, daß in naher Zu¬ 
kunft alle bekannten Standard-Anwendungen auf dem Mega ST 
einsetzbar sind. Nach unseren Erfahrungen sind erstaunlich viele 
Anwendungen schon ohne Veränderung lauffähig. Das gilt auch 
für zahlreiche, sogenannte Public-Domain-Programme. Was das 
ist lesen Sie im entsprechenden Abschnitt weiter unten! 


Der Mega ST ist nett zur Software 

Der große Atari bietet der Software ein "gemachtes Bett". Kein 
anderes System kann annähernd einen so großen Speicherplatz 
zur Verfügung stellen. Zumindest nicht ohne erheblichen Auf¬ 
wand - und der kostet, beispielsweise bei einem Personal Com¬ 
puter des Typs AT, eine Menge Geld. Jedenfalls mehr, als Sie 
für den Mega ST bezahlen mußten. Und was Sie noch interes- 
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sieren wird: Könnte Atari die RAM-Chips selbst hersteilen, 
wäre der Mega ST vermutlich noch um einen Tausendmark¬ 
schein billiger. 

Neben dem enormen RAM-Bereich von zwei bzw. vier MByte 
bietet der Mega ST der eingesetzten Software noch weitere Bon¬ 
bons. Er verfügt über eine serielle Schnittstelle - davon handelt 
ein eigenes Kapitel des Buches, denn der Autor dieser Zeilen ist 
in dieser Hinsicht zugegebenermaßen ein hoffnungsloser Fall. 
Für einen guten "Draht" in der Telekommunikation, nächtelange 
Aufenthalte in sogenannten Mailboxen oder auch Datenbanken 
übersieht er leicht einmal den desolaten Zustand seines Kontos. 
Doch davon kündet wie gesagt ein eigenes Kapitel. 


Was bietet der Mega-Atari sonst noch? 

Er bietet beispielsweise ein komplettes MIDI-Interface. Der 
Musiker horcht nun auf - genau das hat er vielleicht gesucht. 
Der Bildschirm eignet sich hervorragend für Textverarbeitung, 
Grafik und sogar Video-Anwendungen. Einen wichtigen Beitrag 
leistet der Spezialchip Blitter, der Grafikfunktionen erheblich 
beschleunigen kann. Das eingebaute Laufwerk hat eine Kapazi¬ 
tät, die auch ohne Festplatte viele Anwendungen sinnvoll zu 
nutzen erlaubt. GEM als Benutzeroberfläche ermöglicht auch 
dem wenig erfahrenen Benutzer, schnell mit dem Mega ST und 
darauf laufender Software zurechtzukommen. Nicht zuletzt er¬ 
möglicht der Mega ST, wie die anderen Atari ST auch, ein be¬ 
schränktes Multitasking. Der eingebaute Soundchip schließlich 
sorgt dafür, daß der Anwender sich als musikalisches Talent 
entdecken kann. 

Die Festplatte bringt dem System zusätzliche wichtige Eigen¬ 
schaften. Umfangreiche Datenbestände können verwaltet werden, 
die Zugriffszeit ist gegenüber einem Floppylaufwerk erheblich 
kürzer. Auch die übrige Hardware im und am Mega ST kann 
sich sehen lassen. Die Tastatur genügt gehobenen Ansprüchen, 
wenn auch die Tasten noch immer etwas ungünstig gestaltet 
sind. Und der Laserdrucker? Wer einen SLM804 besitzt, kann 
bereits mit den ersten verwendbaren DTP-Programmen arbeiten. 
DTP steht für Desktop Publishing und bedeutet, daß man mit 
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Ausnahme der eigentlichen Vervielfältigung ein Druckerzeugnis, 
Bücher, Zeitschriften, Merkblätter usw. komplett mit Laser¬ 
drucker und Computer herstellt. Dies gilt dann auch für 
Grafiken und Fotografien, die in ein Dokument eingebunden 
werden können. Zum Thema DTP haben wir einen eigenen Ab¬ 
schnitt in dieses Buch aufgenommen, auch wenn dieser Bereich 
von Fachpresse und Anbietern, betrachtet man die relativ ge¬ 
ringe Anzahl verkaufter Programme, offenbar überschätzt 
wurde. 


2.1 Software umsonst - Public-Domain 

Vielleicht haben Sie schon davon gehört. Manches Programm 
darf ganz legal kopiert und gar unter allen Interessenten kosten¬ 
los verteilt werden. Die Programmierer fordern das oft regel¬ 
recht. Die Rede ist von den bereits erwähnten Public-Domain- 
Programmen. Solche Software, die von ihren Erstellern aus 
geradezu idealistischen, nichtkommerziellen Beweggründen unter 
die Leute gebracht wird, gibt es auch für den Mega ST. Quelle 
solcher Programme sind Computerclubs, andere Anwender, 
einige Unternehmen, die große Sammlungen zu einem Un¬ 
kostenbeitrag abgeben und nicht zuletzt die Mailboxen. Letzteres 
sind Computer, die man über das Telefonnetz erreichen und mit 
denen man eine ganze Reihe interessanter Dinge anstellen kann, 
z.B. auch Public-Domain-Software herausladen. 

Public-Domain bedeutet in der Regel nicht "Umsonst gleich 
schlecht". Viele Anwendungen können sich jederzeit mit kom¬ 
merziellen Produkten messen. Natürlich gibt es in diesem Be¬ 
reich aber auch eine Menge ziemlich überflüssiger Programme. 

Es gibt Public-Domain-Software praktisch für jeden denkbaren 
Anwendungsbereich. Kommunikationsprogramme, Textver¬ 
arbeitungen, Hilfsprogramme (Utilities) für die Festplattenver¬ 
waltung, Druckeranpassungen, Zeichensatzeditoren und natürlich 
Spiele gibt es in großer Zahl. Praktisch umsonst, meist muß nur 
der Datenträger bezahlt werden. Die Firma Atari gibt eine Liste 
heraus, die zahlreiche Public-Domain-Programme enthält. Sie 
können sie über jeden Fachhändler beziehen. Übrigens halten 
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auch die Atari-Fachhändler meist ein Bündel von Public- 
Domain-Software bereit. 

Zwei Vertreter der kostenlosen Software möchten wir Ihnen nun 
kurz vorstellen: ein Kommunikationsprogramm sowie ein 
Hilfsprogramm, mit dem man seine Dateien in ein Format 
bringen kann, das auf dem Datenträger weniger Platzbedarf hat. 

Uniterm heißt ein leistungsfähiges Terminalprogramm, das den 
Mega ST in die Lage versetzt, mit anderen Rechnern über das 
Telefonnetz Daten auszutauschen. Ein kommerzielles Programm 
mit den Möglichkeiten dürfte nicht unter hundert Mark zu 
haben sein. Uniterm kostet nichts. Gerade für den Bereich der 
Telekommunikation ist der Mega ST besonders geeignet. Der 
große RAM-Speicher sorgt für viel Raum zum Laden von In¬ 
formationen und Programmen aus Mailboxen. Wie Sie so etwas 
machen, erfahren Sie im Kapitel "Datenfernübertragung mit dem 
Mega ST". Uniterm bietet das, was man von einem Spitzen¬ 
produkt des Marktes, teuer bezahlt, auch erwarten würde. Es 
gibt Möglichkeiten, spezielle Übertragungsprotokolle anzu¬ 
wenden. Diese sorgen dafür, daß eine fehlerfreie Übertragung 
von Daten, besonders Programmen, möglich ist. Das Ganze kann 
mit Uniterm auf Diskette oder Festplatte abgespeichert werden. 
Uniterm ist vollständig in die Benutzeroberfläche von GEM ein¬ 
gebunden - das macht die Bedienung auch für Einsteiger sehr 
einfach. Sie erfolgt über Pull-Down-Menüs und Funktionstasten. 

Haben Sie Probleme, Ihre Daten auf Diskette oder Festplatte 
unterzubringen? Allein ein einziges Bild, das Sie mit einem 
Grafikprogramm erstellt haben, benötigt in der Regel um die 32 
KByte Speicherplatz. Texte für Bücher und sonstige Publika¬ 
tionen verschlingen ebenfalls wertvollen Speicherplatz. Die große 
Familie der Public-Domain-Software bietet auch hier eine 
Lösung: den Filekompressor! Durch ein besonderes Dateiformat 
wird eine Menge Platz eingespart. Leider ist eine dergestalt be¬ 
handelte Datei oder gar ein Programm nicht mehr mit den her¬ 
kömmlichen Methoden lesbar oder ausführbar. Zu diesem Zweck 
wird die Datei dann mit einem entsprechenden "Gegenmittel" 
wieder zur alten Größe gebracht. Wir haben das entsprechende 
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Programm in der US-Mailbox Delphi entdeckt und "herunter¬ 
geladen". Auch in der Bundesrepublik Deutschland soll es einige 
"Filecompressor-Utilities" geben. 

Wer Interesse an Public-Domain-Software hat, sollte bei Com¬ 
puterclubs, Atari-Händlern, Freunden und Mailboxen nach¬ 
forschen. Manche Unternehmen bieten, wie bereits gesagt, 
Public-Domain-Sammlungen an. Hier sollte nicht mehr als DM 
15,- bis DM 20,- für eine Diskette bezahlt werden, die dann 
auch eine Menge Programme enthalten sollte. Einige Vertriebe 
scheinen in diesem Bereich mit üblen Methoden zu arbeiten - 
aufpassen also! Der direkte Handel mit PD-Software ist nämlich 
illegal, ein solches Verhalten widerspricht der Absicht der Pro¬ 
grammierer, die ihre Arbeit nicht finanziell umsetzen wollen. 


2.2 Professionelle Software 

Der Mega ST kann auf eine solide Basis von Programmen bauen, 
die auch schon für die anderen ST-Modelle angeboten wurden. 
Einige dieser Produkte haben sich bereits als Standard etablieren 
können, beispielsweise Ist Word Plus, eine Textverarbeitung. Die 
meisten dieser Standard-Anwendungen laufen auch auf dem 
Mega ST ohne Probleme. Auf den folgenden Seiten möchten wir 
Sie über die wichtigsten professionellen Software-Produkte für 
den Atari Mega ST informieren. Sie erfahren, was Sie unserer 
Meinung nach für welchen Zweck am problemlosesten einsetzen 
können. Natürlich kann ein solcher Überblick nicht vollständig 
sein, denn es werden immer wieder neue Produkte auf den 
Markt gebracht. 


2.2.1 Programme zur Textverarbeitung 

Eine weitverbreitete Anwendung ist das Erstellen von Texten 
mit dem Computer. Auch der Mega ST macht keine Ausnahme. 
Der große Speicher erlaubt die Verarbeitung größerer Text¬ 
mengen. Sinnvollerweise sollte dann aber mit einer Festplatte 
gearbeitet werden. Es gibt heute eine Reihe ausgezeichneter 
Textverarbeitungen für den Mega ST. Dabei darf man allerdings 
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nicht den Fehler machen, diese Programme mit solchen für die 
DTP-Anwendung zu verwechseln, auch wenn manche fast schon 
eine Vorstufe dazu sind. Die wichtigsten Textprogramme wollen 
wir Ihnen nun vorstellen. Alle benutzen GEM zur Benutzer¬ 
führung, das ermöglicht eine leichte Bedienung. Leider ist zur 
Zeit der Drucklegung dieses Buches noch kein Druckertreiber 
für den Laserdrucker erhältlich, der mit den vorgestellten Text- 
und Grafikprogrammen lauffähig wäre. Wenn Sie es in Händen 
halten, dürfte dieses Problem wohl der Vergangenheit angehören. 


Ist Word Plus 

Die bisher bekannteste und verbreitetste Textverarbeitung für 
den Mega ST und seine ST-Vorgänger. Eine Vorgängerversion 
ist Ist Word, das aber erheblich weniger Möglichkeiten bietet 
und auch immer seltener im Einsatz ist. Ist Word und Ist Word 
Plus laufen problemlos auf dem Mega ST. Durch die weite Ver¬ 
breitung und die vielen interessanten Leistungsmerkmale darf 
man das Programm durchaus als Standard betrachten, an dem 
sich konkurrierende Produkte messen lassen müssen. 

In bis zu vier Textfenstern kann der Anwender unterschiedliche 
Texte gleichzeitig bearbeiten. Durch Hin- und Herspringen 
zwischen den Fenstern mit dem Mauspfeil wird auf das je¬ 
weilige Fenster umgeschaltet. Textbausteine lassen sich von 
einem ins andere Fenster transportieren usw. Der Text selbst 
kann mit verschiedenen "Textattributen" versehen werden. Ein 
Rollmenü erlaubt es, zuvor mit dem Mauspfeil oder per Taste 
markierte Textbereiche in Schrägschrift (kursiv), fett, in "heller" 
Schrift, hoch- oder tiefgestellt oder unterstrichen darzustellen. 
Dabei gilt, ebenso wie für die Darstellung der gesamten Seite, 
der Grundsatz: "What you see is what you get", oder kurz 
WYSIWYG. Der Bildschirm gibt alles so wieder, wie es später 
einmal auf dem Drucker erscheint. Zumindest kommt man dem 
Druckbild recht nahe - nicht zuletzt ist es eine Frage des ver¬ 
wendeten Druckers und seiner Zeichensätze, wie das Ergebnis 
schließlich aussieht. 

Ist Word und Ist Word Plus werden mit einer ganzen Sammlung 
von sogenannten Druckertreibern geliefert. Ein solcher Treiber 
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ist nichts anderes als eine Datei, dem das Textprogramm die zum 
jeweils verwendeten Drucker benötigten Daten entnimmt. Die 
Druckertreiber von Ist Word lassen sich wie eine Textdatei 
verändern, indem sie wie ein Text geladen und editiert werden. 
Dazu benutzt man die entsprechenden Steuerzeichen, die dem 
Handbuch des verwendeten Druckers entnommen werden kön¬ 
nen. Der DATA BECKER Führer "Ist Word" sowie das "Große 
Buch zu Ist Word Plus" geben erschöpfend Auskunft zur Arbeit 
mit Ist Word und seinen Druckertreibern. 

Für fast alle gängigen Druckermodelle werden bereits fertige 
Treiber mitgeliefert. Problematisch wird es allerdings in be¬ 
stimmten Bereichen. Ein Zeilenabstand von 1,5 läßt sich eben¬ 
sowenig nutzen wie einer von 0,5 Zeilen bzw. ein stufenlos ein¬ 
stellbarer Abstand. Die meisten Drucker verfügen jedoch ohne 
Zweifel über die Möglichkeit, den Zeilenabstand stufenlos ein¬ 
zustellen. Durch einige Tricks geht es dann doch: Es werden 
einfach einige selten benutzte Sonderzeichen durch die Steuer¬ 
zeichen für den Zeilenabstand ersetzt. Schreibt man nun das 
entsprechende Zeichen irgendwo in den Text, wird es nicht ge¬ 
druckt, sondern der Drucker vollzieht das, was die Steuerzeichen 
bewirken sollen. 

Der gesamte Zeichensatz des Atari ST bzw. Mega ST kann mit 
Ist Word genutzt werden. Das gilt auch für die englischsprachi¬ 
gen ST-Versionen, auch hier lassen sich beispielsweise die 
deutschen Umlaute darstellen. Ist Word Plus verfügt aber über 
weitere Fähigkeiten. Dem Programm ist eine Serienbrief-An¬ 
wendung namens Ist Mail beigefügt, die es erlaubt, gleiche 
Brieftexte mit verschiedenen Adressen zu versehen und auszu¬ 
drucken. Und beinahe schon sensationell mutete es an, daß man 
erstmals Grafiken in den Text einbinden konnte. Ein als 
Accessory eingesetztes Programm, Snapshot.Acc, erlaubt es, be¬ 
liebige Ausschnitte des Bildschirms jederzeit "auszuschneiden" 
und in einen Text einzubinden. Die Funktion läßt sich in nahezu 
allen Programmen anwenden. Selbst für Programme, die ohne 
GEM arbeiten, z.B. das Malprogramm DEGAS, gibt es eine 
Möglichkeit, Bilder auszuschneiden und abzuspeichern. Danach 
kann das Bild in einen Text hineingeladen werden. Beim Aus¬ 
drucken erscheint das Bild dann allerdings manchmal etwas 
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größer oder kleiner, als es auf-dem Bildschirm ausgesehen hat. 
Ist Word Plus zeigt durch gestrichelte Linien an, welchen Platz 
das Bild auf Papier benötigt. Der Anwender kann dann ent¬ 
sprechend viele Zeilen vor und nach dem Bild frei lassen. 

Neben der Einbindung von Grafik und der Serienbrieffunktion 
bietet das Programm noch eine weitere wichtige Funktion - die 
Rechtschreibprüfung. Ein vorhandenes Wörterbuch kann ständig 
durch zusätzliche Begriffe erweitert werden. Ein Text kann mit 
Hilfe des Wörterbuches auf korrekte Orthographie überprüft 
werden. 

A\ File Bearbeiten Block Fornat Attribute Korrektur Grafik Hilfe 



Bild 23: Bis zu vier Fenster erlaubt Ist Word 


Mit dem Mega ST eingesetzt, ist Ist Word ein hervorragendes, 
fast professionelles Werkzeug. "Fast" deshalb, weil wichtige 
Details verbesserungswürdig sind. Beispielsweise die mangelhafte 
Zeilenabstandseinstellung, die etwas fehlerhafte Funktion "Neu 
formatieren...", die einen Text mit neuen Attributen für Rand¬ 
einstellung, Absatzformat etc. versorgen soll, oder das etwas 
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ärmliche Kopf- und Fußzeilenformat. Dafür versöhnt das Pro¬ 
gramm mit leichter Bedienung, vielen Druckeranpassungen und 
der Möglichkeit, auch Programmtexte zu erstellen, die von 
einem Compiler verarbeitet werden können. 


A File Bearbeiten Block Fornat Attribute Korrektur 6raphik Hilfe 


►I« 

C:\WORDPLUS\GRflFIK.DOC 

K 

0 


0 

Beisniel FTTr die Grafik in lS»i Mord Plus 

K 

Die großen Seen sind ein bekanntes Naturschauspie1 Nordanerikas. 

Obwohl sie eine enorne Fläche bedecken, ist auch ihr ökosysten 

durch unverantwortlichen Ungang nit chenischen Substanzen bereits 
in erhebliche Unordnung geraten. Viele in den Seen lebende Tiere 

sind bereits erheblich geschädigt. Natürlich hat nan von Seiten 

der angrenzenden Staaten, USA und Kanada, dieses Probien erkannt. 

Lösung des Probiens. ^ >1 In dieser Hinsicht 

stehen die Vereinig- ly 3 ' * ten Staaten den 

europäischen Ländern | (\ leider nicht nach. 

Die nebenstehende Ab- i \ 7 \ • p* bildung zeigt das 

betroffene Gebiet und L - \ 1 \ alle angrenzenden 

Bundesstaaten der An- I V S.J | rainer-Staaten. In 

diesen aber wird nan 1 ) \ 1 den Raubbau an der 

Jahrzehnten begangen ' \ f v? | wurde, zuerst zur 

Kenntnis nehnen nüs- | i sen. Die Größe des 

Gebietes nahnt dazu,| Aar fr.* Groß* J das Probien bald 

nit allen Einsatz anzugehen. Nun ist 

jedoch nit Sicherheit keine befriedigende Antwort von Kanada und 


I F1 I FZ UNTER I F3 I F4 M, ZfclLE|F7 NEUE I F8 ZEN- F9 EIN- I F IC NEU I C*PS 

FETT | STRICHEN | KURSIV |HBLL LOESCHEN | SEITE | TRI EREN RUECKEN | FORhtftT | LOCK 


Bild 24: Grafik einbinden mit Ist Word Plus 


Ist Word Plus ist eine gute Wahl für jeden, der Texte auf dem 
Mega ST schreiben will - die Möglichkeit, Grafiken einzu¬ 
binden, ist eine erste Vorstufe zum Desktop Publishing. Das 
letzte Quentchen Professionalität vermißt man dennoch. Aber 
das gilt leider für alle bisher erhältlichen ST-Textprogramme. 


Textomat ST 

Nur ein Fenster läßt sich mit Textomat ST öffnen und be¬ 
arbeiten. Das Programm erlaubt dazu auch kein WYSIWYG, 
Steuerzeichen erscheinen sichtbar im Text. Immerhin: Über eine 
spezielle "Zeige-Funktion" kann der Text so auf den Bildschirm 
geholt werden, wie er später auf dem Papier stehen wird. Grafik 






















82 


Das große Mega-ST-Buch 


kann man mit Textomat ST nicht einbinden. Ansonsten stehen 
alle denkbaren Funktionen zur Verfügung. Textomat ST ist eines 
der preisgünstigeren Textprogramme für Atari ST und Mega ST. 
Für einfachere Anwendungen, z.B. zum Schreiben von Briefen 
oder Erstellen von Source-Texten in der Programmierung, ist das 
Programm aber zu empfehlen. 


Desk Datei Bearbeiten Schrift Einstellungen 


A:\TEST.TXT 


BRIEF WRAP 


SPALTE 


ZEILE 


SEITE 


ÖT 


ein Progrann von der RAM-Disk zu laden. Ganz schön flott! 
Progranne von 188 K brauchen noch nicht nal eine Sekunde. Wozu 
läßt sich die |7+|RftM-Disk|7-| an sinnvollsten einsetzen? Wenn 
Sie viel Progranne oder Texte schreiben und Progranne 
assenblieren, So sollten Sie Editor, Quellprogrann und - falls 
genügend Platz laG|der RflM-Disk ist - auch Conpiler, Assenbler 
und Linker unterbringen, das beschleunigt Ihre Arbeit wesentlich. 
Ein konpletter Assenblerlauf, der auf nomalen Disketten 
vielleicht 18 Minuten dauert, braucht nit RAM-Disk oft nicht nal 
eine Minute; eine Zeiterparnis, die die Entwicklungsphase eines 
Progranns deutlich verkürzen kann. Doch hier noch eine Warnung: 
Denken Sie inner daran, daß die Daten auf der RAM-Disk eben nur 
in RAM stehen und nit den Ausschalten des Rechners 
unwiederbringlich verloren sind! Kopieren Sie also die Ergebnisse 
Ihrer Arbeit vor den Ausschalten von der RWi-Disk auf eine 
richtige Diskette! Das gleiche sollten Sie nachen, ehe Sie 
'absturzgefährdete 1 Progranne starten.|nl| c * 

Noch ein paar Hinweise zun Ungang nit der RAM-Disk. Ein Backup 
von einen Laufwerk auf die RAM-Disk oder ungekehrt ist nicht 
nöglich. öffnen Sie statt dessen ein Fenster nit den Laufwerk, 


IcT 


Bild 25: Steuerzeichen im Text - Textomat ST 


Auf dem Mega ST läuft der Textomat ST einwandfrei. Größere 
Probleme traten nicht auf. Allerdings war auch keine besondere 
Beschleunigung festzustellen, wenn der Blitter-Chip eingeschaltet 
wurde. Das gleiche gilt allerdings auch für Ist Word Plus. Ganz 
anders ist das beim folgenden Programm. 


BECKERtext ST 

Wie auch Textomat ST ist BECKERtext ST eine Entwicklung 
der DATA BECKER GmbH. BECKERtext ST ist erheblich 
leistungsfähiger als der Textomat ST aus gleichem Hause. Nach 
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erfolgter Anpassung zeigte sich BECKERtext ST sehr angetan 
vom Blitter-Chip. Operationen wie z.B. das Scrollen des Textes 
liefen nun erheblich schneller ab. Gerade die geringe Geschwin¬ 
digkeit beim "Blättern" eines Textes ist ein großer Nachteil vieler 
Textprogramme. 

Doch BECKERtext hat noch weitere interessante Eigenschaften. 
So verfügt das Programm ab der Version 2.0 über eine 
leistungsfähige Fußnotenverwaltung und die Möglichkeit, bis zu 
sieben voneinander unabhängige Textfenster zu öffnen - je nach 
dem vorhandenen Speicherplatz. Und ein WYSIWYG wie es im 
Buche steht, wird ebenfalls geboten. Ein Rechtschreiblexikon 
steht online, also direkt während der Texteingabe, zur Verfü¬ 
gung. Korrekturen können so leicht vorgenommen bzw. neue 
Begriffe ins Lexikon übernommen werden. 


Desk Datei Bearbeiten Schrift Einstellungen Rechnen 


C:\BTEXT\BEISPIEL.TXT 


BRIEF 


CPI 19 ZflB 1 ZEILE 12 SPULTE 1 


Die InfuzeileR 

C R 

Die Infozeile, die erste quer über den Bildschirm -laufende 
Zeile -über den Text eingabebereich, infomiert Sie über die 
aktuellen -Einstellungen -des -Progrartns. »»Die --einzelnen 
Rnzeigen - Herden -in -Handbuch -genau -erläutert - und zxar 
dann, nenn -sich «aus »den »Zusammenhang »ergibt, «was »sie 
bedeuten »und «wie -sie zu verändern sind, fin dieser Stelle 
finden Sie daher nur knappe Informationen, zusonnen nit den 
Hinweis, «an -welcher «Stelle -des »Handbuchs »Sie -näheres 
nachlesen können.^ 

1 

Die erste flnzeioe BRIEF inforniert Sie darüber, daß Sie -in 


nomalen »Sehreibnodus -arbeiten. Für Proqrannierer verfügt 


BECKERtext ST über den «speziellen -C-Source-Modus. fr 


Die nächsten beiden ffnzeigen CPI »10 »und »ZRB »1 »gehören 
zusannen: sie geben die nonentan eingestellte Schriftbreite 
(CPI) »und den Rbstand zwischen den einzelnen Schriftzeilen 
(ERB) an. Beide Einstellungen Herden souohl bei der Rusgabe 
auf den Drucker »als »auch »bei »der »Bildschimdarstellung 


Bild 26: BECKERtext ST bietet WYSIWYG 


Das ist noch nicht alles. Wer des öfteren Rechnungen und ähn¬ 
liche Formulare ausfüllen muß, kann sich in zweifacher Hinsicht 
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freuen: Einmal bietet BECKERtext die Möglichkeit, eine Maske 
zu erstellen, die unabhängig vom Text geladen werden kann. In 
diese Maske können dann Zahlen und sonstige Daten eingetragen 
werden. Zahlen können bei BECKERtext in Berechnungen ein¬ 
bezogen werden. Man kann also beispielsweise die Zahlen einer 
Spalte addieren, subtrahieren usw. Rechenfunktionen sind 
durchaus nicht selbstverständlich für eine Textverarbeitung. 

Auch die Anpassung des Druckers ist recht einfach. Erstens wird 
eine ganze Reihe von Treibern mitgeliefert, zweitens kann jeder 
mit einem ausführlichen Druckerhandbuch ausgestattete Anwen¬ 
der seine eigene Anpassung erstellen, indem er Zeichen und 
Steuercodes in eine Textdatei mit der Extension .Prt einträgt und 
auf Diskette oder Festplatte sichert. Die Methode ist ähnlich 
einfach wie bereits bei Ist Word beschrieben. 
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Bild 27: Masken erstellen mit BECKERtext ST 


BECKERtext ST ist zuverlässig und sehr schnell. Das Programm 
erlaubt ein schnelles und einfaches Arbeiten - mit Blitter wird 
es noch erheblich schneller bei allen Funktionen, die den Bild¬ 
schirmaufbau betreffen. Natürlich kann man auch mit 
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BECKERtext ST Quelltexte zur Verwendung mit einem Compi¬ 
ler schreiben. Zu diesem Zweck werden die Dateien unforma¬ 
tiert als ASCII-Text (Modus "C-Source") abgespeichert. Auch 
BECKERtext ST kann Grafiken in den Text einbinden. Diesem 
Zweck dient ein besonderes Hilfsprogramm, das ähnlich wie 
Snapshot bei Ist Word Plus funktioniert. Nur ist das Pendant 
Btsnap.Prg (BECKERtext-Versionen älter als Version 2.0) nicht 
als Accessory installiert. Gleiches gilt für die aktuelle Variante 
SNAPIFF.PRG (BECKERtext 2.0). Beide sind nach dem ein¬ 
maligen Starten resident im Speicher und können jederzeit mit 
einer Tastenkombination auf gerufen werden. SNAPIFF.PRG er¬ 
zeugt übrigens Grafikdateien im IFF-Format - auch das ist ein 
Fortschritt von BECKERtext 2.0 gegenüber den älteren Ver¬ 
sionen. BECKERtext 2.0 kann übrigens noch mit einem weiteren 
nützlichen Detail glänzen - ein Accessory namens 
BTHEAD.ACC erlaubt das Gestalten und Einbinden von Kopf¬ 
zeilen bzw. "Headlines". BECKERtext kann ebenso wie Ist Word 
Plus als Standard gelten. Besonders hervorzuheben ist seine Ab¬ 
sturzsicherheit sowie die leichte Einarbeitung auch für ST- 
Anfänger. 


Signum!2 

Dieses Programm ist nicht für jedermann geeignet. Nicht daß es 
schlecht wäre, im Gegenteil! Signum!, jetzt in der Version 2, ist 
eine Textverarbeitung für alle, die wissenschaftliche Texte ab¬ 
fassen müssen. Wisenschaftliche Textverarbeitungen haben die 
spezielle Eigenschaft, z.B. Sonderzeichen und mathematische 
Symbole wiedergeben und ausdrucken zu können. Der Mega ST 
ist alles andere als ein Spielzeug - dementsprechend befinden 
sich unter den Anwendern auch Wissenschaftler, Studenten und 
andere Benutzerkreise, die solche Texte erstellen möchten. 
Diesen kann man Signum! nur ans Herz legen. Natürlich kann 
man mit dem Programm auch normale Briefe schreiben o.ä. 
Aber das hauptsächliche Einsatzgebiet des sehr leistungsfähigen 
Programms ist eben der technischwissenschaftliche Bereich. 

Damit ist das aktuelle Angebot semi- bis professioneller Pro¬ 
gramme fast schon erschöpft. Eine spezielle Version des erfolg¬ 
reichen Textprogrammes MS Word soll in Vorbereitung sein. 
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eine Demoversion konnte schon gezeigt werden - ob was daraus 
wird, muß man abwarten. Ganz anders sieht das im Bereich der 
Grafikanwendungen aus. 
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Bild 28: Signum! bietet einen universellen Zeichensatz 


2.2.2 Grafikanwendungen mit dem Mega ST 

Wieso, werden Sie sich fragen, reden wir hier von Grafikan¬ 
wendungen und nicht von Zeichenprogrammen? Nun, ein 
Zeichenprogramm ist nicht die einzige Anwendung, die es er¬ 
laubt, grafische Darstellungen auf Bildschirm und Drucker zu 
erstellen. Der Bereich der Grafikanwendungen umfaßt weitere 
Einsatzmöglichkeiten: künstlerisches "Malen" und Zeichnen, in 
Farbe und monochrom, technisches Zeichnen oder Bauzeichnen, 
architektonische Arbeiten usw. Nicht zu vergessen auch ein Be¬ 
reich, in dem der Mega ST zum Trickstudio gemacht werden 
kann - durch Animation, also Bewegung selbsterstellter Bild¬ 
folgen. Übrigens gibt es bereits Video-Applikationen, die ein 
Einbinden von Videobildern, mit Kamera oder Fernseher er¬ 
halten, in Programme ermöglicht. 
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Schließlich gibt es noch eine hochprofessionelle Anwendung für 
den Mega ST: das rechnergestützte Konstruieren, auch gerne als 
CAD, Computer Aided Design bezeichnet. Die Ansprüche an 
CAD-Programme sind ebenso hoch wie der verlangte Preis. Bis¬ 
her gibt es nur recht wenige brauchbare CAD-Programme für 
den Mega ST, einige haben noch erhebliche Probleme mit dem 
neuen TOS und dem Blitter-Chip. 

Wichtig zu wissen ist auch, ob ein Grafikprogramm Block¬ 
operationen zuläßt, ob es unterschiedliche Formate zum Ab¬ 
speichern seiner Bilddateien verwenden kann (wegen der Trans- 
portierbarkeit auf andere Anwendungen, z.B. Einbinden erstel¬ 
lter Grafiken in Ist Word Plus), ob es erlaubt, Linien zu "ver¬ 
zerren" usw., oder ob mehrere Bildschirme bzw. Grafiken 
gleichzeitig in den Speicher geladen werden können. Diese und 
weitere Eigenschaften sowie die Art der Programmierung ent¬ 
scheiden darüber, wozu ein Grafikprogramm taugt. Die folgen¬ 
den Absätze sollen Sie über einige der wichtigsten Grafikan¬ 
wendungen informieren. 


Degas Elite 

Der Vorgänger Degas war bereits sehr verbreitet. Mit dem Zu¬ 
satz "Elite" und einer Fülle neuer Funktionen ist die neue Ver¬ 
sion nicht weniger beliebt. Besonders hervorzuheben ist die ein¬ 
fache Bedienung des Programms. Wegen der weiten Verbreitung 
sind viele andere Programme in der Lage, mit Degas erstellte 
Bilddateien zu laden und weiterzuverarbeiten. Degas Elite ist 
keine technische oder professionelle Grafikanwendung. Es lassen 
sich aber, in Farbe und Schwarzweiß, recht ansprechende 
Grafiken erstellen. Wenn es nicht auf maßstabsgerechte Abmes¬ 
sungen ankommt, lassen sich auch Illustrationen und Schaubilder 
für technische und andere Texte anfertigen. 

Alle Aktionen können über Auswahlfelder, Rollmenüs mit zahl¬ 
reichen Optionen und Select-Boxen erreicht werden. Während 
des Arbeitens kann mit der rechten Maustaste zwischen Arbeits¬ 
bildschirm und Funktionsauswahl hin- und hergeschaltet werden. 
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Bild 29: Zeichnen mit Degas Elite 


Übrigens: Viele Grafiken in diesem Buch wurden mit Degas 
Elite erstellt. Allerdings bietet auch Degas Elite keinen ver¬ 
nünftigen Druckertreiber für den Drucker NEC P6 an, den wir 
unter anderem verwendeten. Auch der Laserdrucker SLM804 
kann mit Degas, zumindest über die Druckfunktion, nicht be¬ 
trieben werden. Wir verwendeten deshalb das im folgenden Ab¬ 
schnitt besprochene sehr leistungsfähige Programm, um Degas- 
Bilder zu laden und auszudrucken. 
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Desk File Set Hake Block 



Bild 30: Die Funktionsauswahl von Degas Elite 


STAD 

Ein erstaunliches Grafikpaket. Besonders auffällig sind die her¬ 
vorragenden Druckertreiber. Nicht alle Grafikanwendungen 
unterstützen Matrix-Drucker mit 24 Nadeln. Meist werden bei 
Treibern für diese Drucker lediglich 9 Nadeln angesteuert, was 
zu einem relativ schlechten Druckbild führt. Das Druckbild er¬ 
reicht bei vielen dieser Drucker fast schon Laserdruckerqualität, 
z.B. beim NEC P6, einem preisgünstigen Matrix-Drucker. Mit 
STAD zeigt er seine Qualitäten erst so richtig. Unter anderem 
erlaubt STAD die Erstellung von dreidimensionalen Objekten. 
Auch ein Verschieben oder Drehen der Objekte ist leicht mög¬ 
lich - ohne echte Animation allerdings. Hier taucht auch der Be¬ 
griff der Hidden Lines auf. Darunter versteht man das Ver¬ 
stecken von normalerweise unsichtbaren Verbindungslinien einer 
dreidimensional projizierten Darstellung. Diese Hilfslinien, die 
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bei einem "Drahtmodell" sichtbar sind und eine Hilfe beim 
perspektivischen Zeichnen darstellen, können bei STAD mit 
einer besonderen Option versteckt werden. 

Desk File Objekt Edit Paraneter etc. 



Bild 3t: 3-D-Grafik mit STAD (Hidden Line) 


Zeichensätze und Füllmuster (mit denen geschlossene Flächen 
bedeckt werden können) lassen sich mit STAD, das auch sonst 
alle Grundfunktionen eines Zeichenprogramms erfüllt, ohne 
weiteres verändern. Dabei wird der Anwender mit recht witzigen 
Kommentaren zu allen Funktionen versorgt. 


Easydraw 

Eine verblüffende Ähnlichkeit mit dem Programm GEM-Draw, 
das für die PC-GEM-Version gedacht ist, zeigt Easydraw. Es ist 
mit vielen Möglichkeiten ausgestattet, verlangt aber ein intensi¬ 
ves Lernen im Umgang damit. Im Gegensatz zu den anderen 
bisher genannten Programmen ist es nicht so leicht vollständig 
zu überschauen und anzuwenden. Die Anbieter liefern mittler¬ 
weile eine Reihe von Bibliotheken für Grafik-Bausteine, 
-Symbole, -Zeichensätze und fertige Grafiken. 
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Easydraw arbeitet im Gegensatz zu vielen anderen Programmen 
nicht pixel-, sondern objektorientiert. D.h. eine Grafik wird 
nicht über die Bildpunkte des Bildschirmes, sondern anhand der 
Bestandteile eines Bildes, also Linien, Kreise usw., im Rechner 
aufgebaut. Bestandteile eines Bildes lassen sich so nachträglich 
leicht markieren und ändern. Dafür werden Funktionen wie 
"Sprühen" etc. unmöglich oder schwer realisierbar. 

Wie viele vom PC transportierte Anwendungen ist Easydraw al¬ 
lerdings in mancher Hinsicht weniger leistungsfähig als maßge¬ 
schneiderte ST-Anwendungen. Die älteren Versionen liefen zu¬ 
dem nicht mit dem neuen Mega-ST-TOS. Dieses Problem sollte 
nun gelöst sein. Das Programm hat jedoch auch seine Vorteile - 
beispielsweise kann man seine Zeichnungen leichter durch ein 
einblendbares Raster und Bemaßungen herstellen. Nicht zuletzt 
sind die erwähnten Bibliotheken (Architektur, Elektro usw.) ein 
wichtiges Detail, das man nicht übersehen sollte. 


Monostar Plus/Colourstar 

Zwei ausgezeichnete Grafikprogramme. Erstaunlich ist die Tat¬ 
sache, daß beide nicht in C oder einer anderen "neumodischen" 
Programmiersprache entwickelt wurden, sondern in BASIC ge¬ 
schrieben sind. GFA-BASIC, um genau zu sein. Ein schöner 
Beweis für die Leistungsfähigkeit heutiger BASIC-Implemen- 
tationen. 

Monostar und die Farbversion Colourstar stehen den anderen 
Applikationen in keiner Weise nach. Da finden sich beispiels¬ 
weise Funktionen wie "Biegen" oder "Stauchen". Sogar eine 
Glättungsfunktion für nicht so ganz gelungene Ergebnisse gibt 
es. Da bleibt die Trauer über die nicht vorhandenen 
Animationsfähigkeiten in Grenzen. 

Ausgezeichnete Anwendungen finden sich auch in weiteren Pro¬ 
dukten: Profi Painter ST beispielsweise, das sich besonders für 
den Anfänger eignet. Mit einem Zusatz-Set Text-Design-ST 
lassen sich hervorragend Texte gestalten. Das Programm kann in 
allen Auflösungsstufen, also in Monochrom und Farbe betrieben 
werden. Biege- und Stauchfunktionen sind allerdings nicht vor- 
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handen, dafür besteht die Möglichkeit der Animation über die 
Farbpalette sowie mit Hilfe von Sprites. 

Artkraft ist ein sehr anspruchvolles Produkt, das vor allem da¬ 
durch glänzt, alle anderen Grafikformate lesen zu können. An¬ 
sonsten stehen alle wichtigen Funktionen zur Verfügung. 
Neochrom ist das richtige Grafikprogramm für farbbesessene 
Anwender, die wenig Geld ausgeben wollen. Es läuft nur unter 
Verwendung eines Farbmonitors - dann aber sehr gut! Anima¬ 
tion ist leicht möglich, wie schon die beiliegenden Demofiles 
zeigen (Wasserfall). Neochrom ist fast umsonst zu haben, es ist 
Public-Domain-Software. 

Wir wollen noch einen kurzen Blick auf Programme werfen, die 
hauptsächlich zu Animationszwecken dienen. Hier wären zu 
nennen: GFA Artist, das Video Construction Set und das Ge¬ 
spann Art Director/Film Director. Mit diesen Programmen lassen 
sich kinderleicht ganze Trickfilme erstellen. Die Arbeit besteht 
im Zeichnen von Einzelbildern, die anschließend aneinanderge¬ 
hängt werden. Je mehr Bilder man zeichnet, um so fließender 
erscheint später der "Film". 

Eine "Abart" der Animationsprogramme ist der Pro Sprite 
Designer. Mit diesem Programm lassen sich Sprites erzeugen 
und, ähnlich wie bei den oben beschriebenen Anwendungen zu 
Bildfolgen reihen. Komplette Folgen lassen sich "pur" oder in ein 
Programm eingebunden darstellen. Sensationell die mitgelieferte 
Demo eines Viertakt-Motors, der im Schnitt und in voller Be¬ 
wegung auf dem Bildschirm erscheint. Sprites sind übrigens 
Grafikobjekte, die unabhängig vom übrigen Inhalt über einen 
Bildschirm bewegt werden können. Dabei wird der Bildschirm¬ 
inhalt nicht "zerstört". 

Die professionellste Anwendung im Bereich Grafik dürfte CAD 
sein, das computergestützte Konstruieren am Bildschirm. Zum 
sinnvollem Einsatz benötigt man neben einer gewissen Erfahrung 
im technischen Zeichnen eine wichtige Erkenntnis: Ein CAD- 
Programm ist kein Zeichenprogramm im herkömmlichen Sinne. 
Die Arbeit folgt völlig anderen Gesetzen - man kann nicht ein¬ 
fach mit einem "Pinsel", also dem Mauszeiger, über den Bild- 
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schirm fahren und in Sekunden Ergebnisse vorweisen. Die 
Arbeit ist sinnvoll vorzubereiten, Symbole sind aus Bibliotheken 
auszuwählen, Bemaßungen und eventuell verschiedene Ebenen 
(z.B. einer Leiterplatte) sind zu definieren. Das Ergebnis soll ja 
maßstabgerecht in ein reales Produkt umgesetzt werden. Man 
sollte also genau wissen, was man bezweckt, zum "Malen" ist ein 
CAD-Programm nicht geeignet - und auch zu teuer. 

Der Mega ST benötigt zum sinnvollen CAD nicht nur ein her¬ 
vorragendes Softwareprodukt. Die Ergebnisse können nicht auf 
einem normalen Drucker korrekt wiedergegeben werden. Zur 
Ausgabe braucht der Anwender einen sogenannten Plotter. Ein 
solches Gerät bringt maßstabgerecht alle Zeichnungen aufs 
Papier. Auch ein Laserdrucker ist dazu ungeeignet. Da Plotter 
technische Geräte für den profesionellen Markt sind und mit 
geringen Toleranzen arbeiten müssen, sind sie entsprechend 
teuer. 

Es gibt zur Zeit drei ausgezeichnete CAD-Programme für den 
Mega ST, die allerdings nicht in die Güteklasse von Anwendun¬ 
gen mit Auflösungen ab 1024 mal 1024 Bildpunkten auf Work¬ 
stations kommen. Bei Profis gilt dies als die untere Grenze der 
Erträglichkeit. Als Rechner dient dann meist ein auf gerüsteter 
PC oder gar ein System der mittleren Datentechnik. Speziell für 
die Erstellung von Leiterplattenlayouts ist das sehr günstige 
Platine ST gedacht. Für weitere Aufgaben ist das Programm 
nicht vorgesehen. Der Hobby-Elektroniker dürfte jedoch seine 
Freude daran haben. 


Campus CAD 

Hier haben wir es mit einer sehr soliden Applikation zu tun. 
Campus CAD kommt den Vorgaben für echtes CAD am 
nächsten. Auch die Bedienung ist relativ leicht zu erlernen. Die 
untenstehende Abbildung zeigt, daß wichtige Funktionen über 
den Bildschirm mit der Maus erreicht werden können. Eine 
Textfunktion erlaubt die Beschriftung des erstellten Objektes. 
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Bild 32: Campus CAD mit Beispiel "Welle" 


Das Programm erlaubt verschiedene Optionen, die per Menü¬ 
leiste zu erreichen sind. Beschränkte Zeichenfunktionen werden 
von Campus CAD auch zur Verfügung gestellt. Die Grafik in 
der Abbildung entstammt einer Hardcopy des Bildschirms. 
Selbstverständlich erscheint die Welle nach dem Ausgeben auf 
einen Plotter nicht mehr verzerrt. 


GFA Draft Plus 

Das ist eine relativ preisgünstige Möglichkeit, an ein CAD-Pro- 
gramm zu kommen. Allerdings liefen die uns zur Verfügung 
stehenden Versionen noch nicht fehlerlos auf dem Mega ST. 
Auch das sollte sich bald ändern. GFA Draft Plus ist ein recht 
leistungsfähiges Produkt. Die Einarbeitung ist etwas schwieriger 
als bei vergleichbaren Programmen. Der Mega ST bietet dem 
Programm eine ideale Umgebung. Geräte der alten ST-Serien 
konnten, besonders wenn das Betriebssystem nicht auf ROMs 
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gespeichert war, nur relativ kleine Bilddateien bearbeiten. Mit 
dem Mega ST gibt es dank des großen Speicherplatzbedarfes 
keine Probleme in dieser Hinsicht. 



Selbstverständlich verfügt auch GFA Draft über Symbol¬ 
bibliotheken, auch die Bemaßung und Beschriftung der Objekte 
ist kein Problem. GFA Draft erlaubt ebenfalls das Arbeiten mit 
verschiedenen Ebenen. 


CAD Projekt 

Dies ist ein relativ neues Produkt, das den preisgünstigen Ein¬ 
stieg in CAD ermöglicht. 24-Nadeldrucker werden ebenso 
unterstützt wie Plotter. Trotz seiner Professionalität ist die Be¬ 
dienung relativ leicht zu erlernen. Eine eigene Benutzerober¬ 
fläche ist ebenso vorhanden wie eine spezielle Textfunktion, die 
auch ein Formatieren des Textes erlaubt. 
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Wichtig: Bei einigen Grafikprogrammen (z.B. Easydraw), aber 

auch bei manchen Textverarbeitungen, wird das so¬ 
genannte GDOS verwendet. Zumindest fragt das Pro¬ 
gramm "nach", ob GDOS vorher geladen wurde. Bei 
Benutzung eines Mega ST mit Laserdrucker kann es 
hier zu Konflikten kommen, vor allem dann, wenn 
Sie eine ältere GDOS-Version verwenden. Mit GDOS 
V.1.8 scheint es keine Probleme zu geben. Sollten 
Probleme auftauchen, wenn Sie ein GDOS in Ihrem 
AUTO-Ordner haben, so fragen Sie Ihren Software¬ 
händler um Rat. Hilft alles nichts, löschen Sie GDOS 
aus dem AUTO-Ordner, und starten Sie es erst nach 
dem Booten des Rechners sowie dem Aufruf des 
Laserdruckertreibers. 


2.2.3 Dateiverwaltungen und Datenbanksysteme 

Wer einen Computer besitzt, hat meist auch den Wunsch, diesen 
zum Speichern wichtiger Daten zu benutzen. Die Art dieser 
Daten ist so verschieden wie ihr Umfang. Sei es nun das Adreß- 
verzeichnis der Bekanntschaft, die Dia- oder Schallplatten¬ 
sammlung. Im kommerziellen Bereich ist das nicht anders: 
Lagerbestände, Kundendaten, Literaturverzeichnisse usw. können 
mit Hilfe eines Computers leichter verwaltet bzw. gespeichert 
werden. 

Diesem Zweck dienen Dateiverwaltungs- und Datenbankpro¬ 
gramme. Die einfacheren Dateiverwaltungen stellen den Benutzer 
kaum vor besondere Probleme, meist läuft alles auf dem Bild¬ 
schirm unter GEM ab - der Anwender erstellt eine Eingabe¬ 
maske, legt die Größe der Datenfelder fest, bestimmt, welche 
Schlüsselworte einen Datensatz wieder aufzufinden gestatten - 
und trägt seine Daten ein. Ein Datenbanksystem hingegen er¬ 
laubt das Erstellen hierarchisch oder relational organisierter 
Datenbanken, oft mit Hilfe einer speziellen Programmiersprache. 
Solche Datenbanken können miteinander verknüpft werden, was 
ein erheblicher Vorteil für den Suchenden ist. Denn das ist ja 
das Wichtigste an einer Datenbank - die gewünschte Information 
auch wiederzufinden. 
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Eine Reihe interessanter Produkte sind für den Mega ST ge¬ 
eignet. Der wiederum ist ein ausgezeichneter Partner: durch An¬ 
legen einer RAM-Disk kann die Arbeit mit einer Datenbank 
(z.B. das Sortieren von Datensätzen) enorm beschleunigt werden. 


Adimens ST 

Dieses Programm bietet, vor allem im Verein mit dem Zusatz¬ 
programm Aditalk ST, eine überzeugende Leistung. Man kann es 
ohne weiteres als Standard bezeichnen. Das relationale Daten¬ 
banksystem macht es auch weniger erfahrenen Anwendern, die 
des Programmierens wenig oder nicht mächtig sind, leicht, die 
ersten Schritte zu unternehmen. Adimens ST macht vollen Ge¬ 
brauch von GEM. 


IsGemDa 

Hier haben wir es mit einer hierarchisch organisierten Daten¬ 
bankanwendung zu tun. Das Programm mit dem etwas merk¬ 
würdigen Namen (eine Abkürzung, wie Sie sich schon denken 
werden) dürfte eines der- professionellsten Datenbanksysteme für 
den Mega ST sein. Obwohl die Möglichkeit besteht, IsGemDa 
mit eigenen Funktionen in alle gängigen Programmiersprachen 
einzubauen, läßt es auch den Einsteiger in den Genuß seiner 
Leistungen kommen. Das Programm erlaubt erstaunlich schnelles 
Arbeiten. Wie bei den übrigen Datenbankapplikationen, sollte 
man RAM-Disk und Festplatte zur Arbeit einsetzen. 


dBman ST 

Wie der Name schon vermuten läßt, stand bei der Entwicklung 
dieses Programms das bekannte dBase II Pate. Das verwundert 
auch niemanden, denn es stammt in der ersten Version noch aus 
der Anfangszeit der ST-Computer. Ähnlich wie beim Vorbild 
verfügt dBman über eine eigene Programmiersprache, mit deren 
Hilfe man seine Datenbank maßschneidern kann. Für den Ein¬ 
steiger dürfte das Programm, auch wenn es teilweise mit der Be¬ 
nutzeroberfläche von GEM arbeitet, weniger geeignet sein. Es 
erlaubt jedoch sehr schnelle und professionelle Anwendungen. 



98 


Das große Mega^ST^Ruch 


Nur zu empfehlen ist auch STandardbase III, ein erst kürzlich 
auf dem Markt erschienenes Programm. Ein umfangreiches 
Handbuch läßt schon vermuten, daß man es mit einem 
leistungsfähigen System zu tun hat. Wie alle bisher beschriebenen 
Datenbankprogramme ist auch STandardbase III auf dem Mega 
ST lauffähig. Das bereits erfolgreich auf MS-DOS-Systemen 
laufende BECKERbase PC wurde nun ebenfalls für den ST an¬ 
gepaßt. BECKERbase ST bringt seine eigene Datenbanksprache 
mit und benutzt GEM zur Benutzerführung. 

Neben den oben aufgeführten Datenbanksystemen gibt es noch 
einfachere, für bescheidene Ansprüche jedoch ausreichende 
Dateiverwaltungsprogramme. Als Beispiele möchten wir DB- 
Master und Datamat ST nennen, die ohne Probleme auf dem 
Mega ST laufen. Solche Anwendungen haben vieles mit einem 
Karteikasten gemein - sind aber weitaus praktischer! 


2.2.4 Mega macht Musik 

Es gibt zwei Wege, den Mega ST als höchst musikalisches Gerät 
zu erleben - per Soundchip und Lautsprecher oder als Steuer¬ 
rechner eines MIDI-Systems. Für beide Anwendungen gibt es 
sehr gute Software. Während sich im Bereich MIDI hauptsächlich 
Fachunternehmen aus dem Bereich der professionellen Musik 
umtun, bieten fast alle Softwarehäuser mit ST-Programmen auch 
solche an, mit denen man ganz schön "in die Tasten hauen" 
kann. 

Digidrum ST ist ein solches Programm mit einer allerdings ganz 
speziellen Zielrichtung: Es verwandelt den Mega ST in ein 
elektronisches Schlagzeug mit erstaunlicher Vielfalt. Kaum ein 
Effekt, der nicht zu realisieren wäre. Selbstverständlich läßt sich 
ein mit Digidrum ST erzeugter Rhythmus auch in anderweitig 
"erzeugte" Musik einbauen. Dazu benötigt man allerdings einen 
entsprechenden Hardwarezusatz. 

Sehr beliebt ist es übrigens bei Programmierern, digitalisierte 
Musikstücke auf den Mega ST zu übertragen. Der große 
Speicher sowie eine Festplatte machen es möglich, selbst längere 
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Songs vom ST "abspielen" zu lassen. Es würde im Rahmen unse¬ 
rer Softwareübersicht zu weit führen, tiefer in den Bereich 
Mega ST und Musik einzudringen. Interessenten vor allem für 
den MIDI-Einsatz finden weitere Informationen in Fachzeit¬ 
schriften für Musiker. 


2.2.5 Das Spielerparadies 

Natürlich - der Mega ST ist auch eine große Spielmaschine. 
Indes, "nur" zum Spielen ist er wohl eine Idee zu kostspielig. Wie 
dem auch sei, spielen kann man auch mit dem bisher größten 
aller ST-Computer. Leider haben sich die Programmierer vieler 
Spiele jedoch recht wenig darum gekümmert, ob das TOS sich 
irgendwann mal änderte. Sie benutzten Feinheiten und Eigen¬ 
heiten des Betriebssystems, die nur auf ältere Versionen des TOS 
zutreffen. Damit ließen sich zum Teil enorme Effekte, z.B. 
höhere Geschwindigkeiten, erzielen. 

Der Erfolg: Viele Spielprogramme, oft auch wegen eines 
artistischen Kopierschutzes, laufen nicht mehr auf dem Mega 
ST. Dieses Schicksal ereilte z.B. das wunderschöne StarTrek oder 
die Reisenden im Wind. Beide nach Vorlagen aus Fernsehen und 
Comic gestaltete Grafik-Adventures stürzen sang- und klanglos 
ab. Doch wo Schatten, da auch Licht! Sowohl das beliebte Winter 
Games, eine Sportsimulation mit enormer Grafik, als auch Little 
Computer People sowie viele andere bekannte Spielprogramme 
laufen einwandfrei. 

Ein paar besonders schöne Simulationen und Spiele möchten wir 
Ihnen nun vorstellen. Ansonsten kann man dem Anwender vor 
dem Kauf eines Spiels nur raten, dessen Funktionstüchtigkeit 
auf einem Mega ST schon beim Händler zu testen. 


Flight Simulator II 

Diese atemberaubende Simulation eines Sportflugzeuges von 
Sublogic ist schon fast Legende. Ursprünglich auf dem IBM PC 
entwickelt, gibt es heute Versionen für fast jede Maschine. So 
auch für den Atari ST bzw. Mega ST. Das Programm läuft 
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sowohl mit Färb- als auch mit Monochrom-Monitor. Die Simu¬ 
lation ist, obwohl die Grafikfähigkeiten des Mega ST nicht ganz 
genutzt werden, hervorragend gelungen. Fast könnte man sagen: 
Wer nach einer gewissen Praxis mit dem FS II noch immer ab¬ 
stürzt, ist selber schuld. 



Bild 34: Nur Übung verhindert den "Absturz" - der Flugsimulator II von 
Sublogic 


Der Bildschirm zeigt das Cockpit der Maschine, auf Wunsch 
kann man sein Fluggerät auch vom Boden oder aus der Luft 
beäugen. Alle wichtigen Armaturen werden angezeigt und müs¬ 
sen vom "Piloten” bedient werden - Fehler resultieren oft in 
einem "Crash". Man kann einige Gebiete der USA "überfliegen", 
in Zukunft werden "Scenery Disks" erhältlich sein, die weitere 
Gebiete für den "Luftverkehr" erschließen sollen. Die Landschaft 
wird relativ gut dargestellt. Durch die direkte Übertragung vom 
PC könnte es etwas besser gelungen sein. 
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Guild of Thieves 

Hier haben wir es mit einem kombinierten Text-/Grafik- 
adventure zu tun. Der Spieler hat sich als Dieb zu bewähren, um 
in die Gilde der Diebe Aufnahme zu finden. Geklaut wird 
buchstäblich alles, was nicht niet- und nagelfest ist. Die Grafik 
sucht in ihrer Qualität noch Herausforderer. 


Clever&Smart 

Die beiden bekannten Comic-Figuren werden bei diesem Spiel 
mit Aktion- und Adventure-Elementen lebendig. Wer mit Sinn 
für Humor ausgestattet ist, wird dieses Programm schätzen. 

Schließlich soll noch ein Spiel erwähnt werden, das eigentlich 
gar keines ist: Balance of Power macht Sie zum Chef einer der 
Supermächte. Ob Sie nun dem Land des Kaugummis oder der 
Heimat des Wodkas Ihre Intelligenz zur Verfügung stellen - Ziel 
ist es, durch geschickte Schachzüge das "Gleichgewicht der 
Macht" auf der Erde nicht durcheinanderzubringen. Gelingt dies 
nicht, wissen Sie ja was passiert: Der Film "The Day after" in¬ 
formierte ausführlich darüber. 

Apropos Adventure: Nicht vergessen sollte man die berühmten 
Text-Adventures von Intercom. Obwohl auf jede Grafik ver¬ 
zichtet wird, das hat Tradition bei Intercom, ist der Spielwert 
sehr hoch. Dies liegt vor allem an der großen Zahl komplexer 
Redewendungen, die die Programme verstehen. Wer ein 
Intercom-Adventure erfolgreich zu Ende bringt, der ist ein 
wirklicher "Spitzen-Abenteurer". Alle Intercom-Adventures 
laufen anstandslos auf dem Mega ST. 

Wichtig: Viele Spiele sind nur lauffähig, wenn Sie einen 

Farbmonitor benutzen. Technisch begabte Anwender 
können einen normalen Grünmonitor (nicht von 
Atari) eventuell Umrüsten. Unter Verwendung des 
Composite-Signals erscheint die Grafik dann in 
Grau- (Grün-) Stufen. Nur wenige Spiele sind im 
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übrigen allein mit Maus und Tastatur zu bedienen. 
Meist benötigen Sie noch einen Joystick, den es 
günstig im Handel gibt. 


Sonstige Software 

Es gibt noch eine ganze Menge an Software für den Mega ST, 
die sich nicht ohne weiteres in eine Schublade stecken läßt. So 
haben wir beispielsweise noch gar nicht über Tabellenkalkula¬ 
tionen, Buchhaltungsprogramme oder solche zur Hausverwaltung 
gesprochen. Die gibt es natürlich auch, der Mega ST ist auch für 
solche Aufgaben dank seiner Geschwindigkeit ein idealer Helfer. 
Leider fehlt es uns aber hier an Platz, darauf näher einzugehen. 
Das gleiche gilt für die sogenannte Branchensoftware. Hier 
handelt es sich um spezielle Produkte für die gezielte Anwen¬ 
dung in einem einzigen Bereich. Beispiele finden sich in Ab¬ 
rechnungssoftware für Zahnärzte und Mediziner, Verwaltungs- 
Programme für Friseursalons oder gar spezielle Designpro¬ 
gramme für die Erstellung von Schnittmuster-Entwürfen in der 
Modebranche. 


War das schon alles? 

Mitnichten! Natürlich ist Ihnen aufgefallen, daß wir bisher 
weder Programmiersprachen noch Kommunikationssoftware be¬ 
sprochen haben. Auch von einem Diskmonitor oder einem 
Disassembler war noch nicht die Rede. Damit haben wir uns 
dort befaßt, wo es unserer Meinung nach hingehört - in den 
Abschnitten, die sich damit befassen, was man mit solchen Pro¬ 
grammen anfangen kann, nämlich kommunizieren bzw. Daten¬ 
fernübertragung betreiben programmieren und nicht zuletzt seine 
Festplatte oder Floppy durchchecken. 

Und natürlich haben wir uns auch um den letzten Schrei der 
ST-Szene bemüht: Gleich unten geht es mit Desktop Publishing 
weiter - bis dann also! 
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2.3 Desktop Publishing und Mega ST 

Wie ist es doch auf der ersten Seite des Handbuches zum Pro¬ 
gramm "Publishing Partner" von Soft Logic zu lesen: "Wir sind 
nicht verantwortlich zu machen, wenn Setzer geschäftliche Ein¬ 
bußen haben". Ein starker Satz, sicher wird er irgendwann ein 
gewisses Maß an Gültigkeit haben. Denn alle arbeiten daran - 
am Desktop Publishing, kurz auch als DTP bezeichnet. 

Was ist DTP? Der Anwender soll in die Lage versetzt werden, 
druckfertige Vorlagen für jede Art von Druckerzeugnis, vom 
Buch bis hin zur Visitenkarte, direkt am Rechner zu erstellen. 
Dem Druckgewerbe bliebe nur noch die eigentliche Vervielfälti¬ 
gung. Leider (oder zum Glück?) stehen diesem Bestreben einige 
Hindernisse im Weg. Denn erstens: Setzen will gelernt sein - es 
handelt sich hier nicht von ungefähr um einen anerkannten 
Fachberuf mit hohen Anforderungen. Zweitens: Kaum ein be¬ 
kanntes Softwareprodukt erfüllt zur Zeit die Anforderungen, die 
an DTP gestellt werden. Allerdings schmücken sich viele Pro¬ 
dukte mit dem Prädikat DTP - oft eine völlige Fehleinschätzung 
für Software, die bestenfalls als fortgeschrittene Textver¬ 
arbeitung bezeichnet werden kann. 

Was aber sind die Anforderungen, die an DTP gestellt werden, 
und wie kann der Mega ST in diesem Bereich genutzt werden? 
Zur Beantwortung dieser Frage wollen wir uns einmal ansehen, 
wie eine Seite, sagen wir von einer Computerzeitschrift, entsteht. 


2.3.1 Wie es ist - ohne DTP 

Am Anfang steht, wie sollte es anders sein, die Idee des Autors 
oder Redakteurs. Er hat auch gewisse Vorstellungen darüber, 
wie der geplante Artikel optisch aussehen soll, er möchte eine 
ganz bestimmte Verteilung der Informationen auf den vielleicht 
drei Seiten haben, die ihm für den Beitrag zur Verfügung 
stehen. 
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Er wandert nun also zu seiner Grafik-Abteilung und läßt sich 
ein sogenanntes Skribble erstellen - denn er kann nicht zeichnen 
oder ein Layout erstellen. Nach Übernahme der Informationen 
über den Artikelinhalt und die gewünschte Präsentation macht 
sich der Grafiker an das Skribble: Er erstellt eine von Hand ge¬ 
fertigte Vorlage, die als Modell für den wirklichen Artikel 
dienen soll. Grafiken werden manuell skizziert, ebenso Foto¬ 
grafien, Textbereiche werden mengenmäßig definiert und die 
entsprechenden Stellen, an denen der Text später stehen soll, 
werden auf dem Skribble mit Blindtext gefüllt. Unter Blindtext 
versteht man einen Fülltext, der lediglich als Platzhalter für den 
richtigen Text dient und der aus Textfragmenten ohne erkenn¬ 
baren Sinn besteht. Blindtext erlaubt allerdings einen ersten Ein¬ 
druck vom Aussehen der endgültigen Seite. 

Sofern das Skribble die Zustimmung der Redaktion findet, 
liefert der Autor nun seinen Beitrag als Fließtext, d.h. ohne jede 
Formatierung, an die Textredaktion, die eine Rechtschreib¬ 
prüfung vornimmt. Der Beitrag wurde zuvor noch vom zuständi¬ 
gen Redakteur auf sachliche Richtigkeit überprüft. Der Fließtext 
sollte vom Autor möglichst exakt nach den Vorgaben des 
Skribbles geliefert werden: Die Menge muß stimmen, die Ein¬ 
leitung, die in einer andere Schriftart gesetzt werden soll, und 
die Anzahl von Zwischen-Headlines, gewissermaßen eine Art 
Text-Überschrift mit Bezug auf die folgenden Absätze, muß 
ebenfalls gut verteilt werden. 

Schließlich wird der Text auf einer Diskette in die Setzerei ge¬ 
bracht. Zuvor hat ein weiterer Mitarbeiter den Text mit Steuer¬ 
zeichen für die Satzmaschine versehen - Fettschrift, Kursiv¬ 
schrift, Unterstreichen, Überschriften usw. werden so im Aus¬ 
sehen festgelegt. Der Setzer legt nun die Diskette in das Lauf¬ 
werk einer Satzmaschine, z.B. vom Typ Linotype. Solche 
Maschinen produzieren dann den eigentlichen Satz auf schmalen 
Streifen - entsprechend der Breite einer Spalte der fertigen 
Zeitschriftenseite. Diese Maschine nimmt auch das Trennen des 
Textes vor. Dabei kommt es, sofern die Software der Satz¬ 
maschine nicht absolut perfekt ist, oft zu makabren Trenn¬ 
fehlern - z.B. bei "st", das man ja laut Duden "nie trennen" 
sollte. Das liegt meist daran, daß die verwendeten Trenn- 
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algorithmen der Software oft angelsächsischen Quellen entstam¬ 
men - und dort hat man von deutscher Grammatik nicht die 
leiseste Ahnung. 

Ist alles gut verlaufen, kommen die Satzfahnen, eben die Streifen 
des produzierten Satzes, in die Grafikabteilung, um dort geklebt 
zu werden. Die Grafiker kleben nun Kopien des Satzes auf 
Vorlagen mit der Abmessung einer Zeitschriftenseite. Ent¬ 
sprechend dem angefertigten Skribble wird die Seite nun mit 
Satz gefüllt. Dabei stellt sich oft heraus, daß der Text noch ge¬ 
kürzt werden muß. Die Schere kommt immer wieder zu ihrem 
Recht. Ist alles passend, sind die Überschriften (Headlines), die 
Untertitel (Sublines) und Zwischen-Headlines (s.o.) eingeklebt, 
fehlen nur noch Bilder und Grafiken bzw. Fotografien. 

Diese fügt man der mit Originalsatz geklebten endgültigen Seite 
bei - von der Druckerei bzw. Reproanstalt werden sie an das 
gewünschte Format angepaßt. Gleiches gilt für eventuelle Pro- 
grammlistings und Tabellen. Das Setzen von Tabellen kostet in 
der Regel ein kleines Vermögen. Schlußendlich geht das Ganze 
in die Druckmaschine - die fertige Seite ist das Resultat. Nach 
dem Binden kann das fertige Magazin in den Handel gehen. 

So sieht der Vorgang vereinfacht aus, der zu einer Seite 
beispielsweise der DATA WELT führt. Mit DTP soll folgendes 
passieren: Bis auf die Vervielfältigung fallen alle anderen 
Arbeitsgänge, abgesehen von der grammatischen und sachlichen 
Überprüfung, komplett weg. Ob und wie das möglich sein soll, 
lesen Sie im folgenden Abschnitt. 


2.3.2 Wie es sein soll - mit DTP 

Ob perfektes DTP (das es noch nicht gibt, soviel sei verraten) 
den einen oder anderen Arbeitsplatz kostet, lassen wir hier 
dahingestellt - einen Gedanken sollte dieser Aspekt allerdings 
schon wert sein. Der Anwender jedenfalls würde zukünftig in 
folgender Weise vorgehen: Er schreibt seinen Text und speichert 
ihn auf seiner Festplatte ab. Die gewünschten Fotografien oder 
sonstige Abbildungen werden hergestellt. Er startet sein DTP- 
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Programm und erstellt sein eigenes Bildschirm-Skribble, indem 
er Text- und Grafikblöcke auf dem Bildschirm markiert. Zu¬ 
mindest ein Teil der kompletten Seite, besser die gesamte Seite, 
wird dabei dargestellt. Nun scanned er die Abbildungen in 
seinen Computer und legt auch diese als Datei ab (s.u.). 

Der Text wird nun in die Seite geladen, er sollte sich automa¬ 
tisch um die Grafikblöcke herum in den markierten Textblöcken 
anordnen. Jetzt kann man noch Attribute zuordnen. Fettschrift 
für Headlines usw. Fehlen nur noch die Abbildungen - auch die 
werden von der Festplatte geladen und landen in den Grafik¬ 
blöcken, die Seite kann jetzt auf dem Bildschirm bewundert 
werden, Korrekturen sind, dank der Blockmarkierungen, jeder¬ 
zeit möglich. Selbstverständlich sind auch alle anderen Aktionen, 
wie Zuteilung der Seitennummern (Paginierung) oder Erstellung 
von Kopf- und Fußzeilen, denkbar. Wie einst mit der Schere, so 
kann der Anwender jetzt mit der Maus die Blöcke "aus- 
schneiden", herumschieben und an beliebiger Stelle einfügen. Im 
Gegensatz zu einer normalen Textverarbeitung arbeitet ein DTP- 
Programm also mit Blöcken, aus denen eine Seite zusammenge- 
puzzelt werden kann. Außerdem lassen sich beliebige Textef¬ 
fekte nachträglich erzielen. 

Auf Papier gebracht wird das Ergebnis mit einem Laserdrucker, 
in unserem Falle also z.B. mit dem SLM804. Der benötigt 
mindestens ein MByte RAM und einen Prozessor mit hoher 
Arbeitsgeschwindigkeit, denn er muß jede Menge Informationen 
über die zu druckende Seite aufnehmen sowie zahlreiche Be¬ 
rechnungen anstellen. Der SLM804 hat aber weder einen Pro¬ 
zessor noch RAM, ergo besorgt er sich beides beim Mega ST. 
Daher ist die große RAM-Kapazität der Mega’s so wichtig für 
den Betrieb des SLM804. 

Für Anwendungen wie Schülerzeitungen etc. tut’s allerdings auch 
ein hochauflösender Matrixdrucker wie der NEC P6. Bleibt noch 
der Gang zum Drucker, der das Ganze vervielfältigt. Sollte 
Farbe im Spiel sein, dann helfen doch nur die weiter oben be¬ 
schriebenen Verfahren. Allerdings - die ersten Farblaser sind 
schon in Sicht, zu horrenden Preisen allerdings. Vorausgesetzt, 
die Soft- und Hardware erfüllt alle Anforderungen und der An- 
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wender kann sich unter "Seitengestaltung" etwas vorstellen, wer¬ 
den also eine ganze Reihe von Arbeitsgängen vereinfacht oder 
ganz eingespart. Schlußendlich sollte DTP so aussehen, daß man 
per Datenfernübertragung ein Dokument direkt an eine Satz¬ 
maschine gibt, die dann die Druckvorlagen ausspuckt. 


2.3.3 Was man alles braucht 

Der DTP-Anwender braucht neben erheblichen Kenntnissen 
grafischer Fachrichtung eine Menge Geld. Denn er muß sich 
nicht nur Rechner und Programm anschaffen. Immerhin - der 
Atari Mega ST hat den Vorteil eines großen RAM-Speichers so¬ 
wie einen schnellen Prozessor, eben den 68000. Wie ein IBM PC 
AT mit 80286-Prozessor oder gar ein Computer mit dem Pro¬ 
zessor 80386 ist er von der Geschwindigkeit her für DTP ge¬ 
eignet - und kostet erheblich weniger. Hier die Liste der DTP- 
Aktivposten: 

1. Ein Mega ST muß es sein, schon wegen des Speicher¬ 
platzes, der Blitter sollte die Sache beschleunigen. 

2. Eine Festplatte ist unbedingt vonnöten - Floppys sind zu 
langsam im Zugriff auf die Daten und haben zuwenig 
Speicherkapazität. Die Software ist meist auf Festplatten- 
betrieb eingestellt. 

3. Als Bildschirm kommt mindestens der Monochrom-Moni- 
tor in Frage - verwendbare Farbgeräte sind sehr teuer, der 
Originalmonitor SC 1224 ist unserer Ansicht nach unge¬ 
eignet und ermüdet die Augen sehr schnell. Ein Ganz- 
seiten-Monitor ist die ideale Lösung - er erlaubt die Dar¬ 
stellung kompletter DIN-A4-Seiten, ist allerdings sehr 
teuer. Zudem benötigt man spezielle Software zur Anpas¬ 
sung an das verwendete DTP-Programm. 

Laserdrucker heißt die Devise für die Ausgabe. Der 
SLM804 erfüllt alle Voraussetzungen. Trotz der höheren 
Punktdichte mancher Matrixdrucker sind beispielsweise 
schwarze Flächen nur mit einem Laserdrucker auch wirk- 


4 . 
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lieh schwarz. Ein Matrixdrucker mit 24-Nadel-Druckkopf 
kann für begrenztere Aufgaben, für Probedrucke allemal, 
herhalten. Der NEC P6 schafft mit BECKERpage gar eine 
höhere Auflösung als ein Laserdrucker üblicher Bauweise: 
360 DPI. Das Problem: Der Ausdruck dauert eine ganze 
Weile - und stellt die Geduld auf eine harte Probe. Um¬ 
fangreichere Druckwerke auf diese Weise zu erstellen, 
dürfte nur äußerst hartgesottenen Zeitgenossen zuzumuten 
sein. 

5. Ein Scanner muß her, es sei denn. Sie möchten "Blei- 
wüsten" ohne jede bildliche Darstellung erzeugen. Dieses 
Gerät dient dem Einlesen von Grafiken und Fotografien, 
die nicht mit dem Computer selbst erzeugt wurden, in den 
Mega ST. Ähnlich einem Kopierer (manche Scanner kann 
man auch als solchen benutzen) "kopiert" der Scanner eine 
Vorlage, nur nicht auf Papier, sondern über eine Schnitt¬ 
stelle in eine Datei auf Diskette oder Festplatte, die sich 
mit der meist mitgelieferten Software bearbeiten (z.B. ver¬ 
kleinern) und vom DTP-Programm laden läßt. Ein Scanner 
ist nicht billig - um die zweitausend Mark sind mindestens 
anzulegen, meist ist es mehr. 

6. Schließlich braucht der DTP-Aspirant noch die DTP-Soft- 
ware selbst. Zwischen rund 400 bis gut 2000 Mark sind 
z.Z. zu bezahlen - wahrhaft kein billiges Vergnügen. Der 
semi- bis vollprofessionelle Anwender ist daher die eigent¬ 
liche Zielgruppe von Anbietern in diesem Bereich. Zur 
direkten Ansteuerung einer Satzmaschine oder zur Ver¬ 
wendung eines Laserdruckers höchster Qualität sollte die 
Software mit PostScript oder einer anderen Seitenbe¬ 
schreibungssprache arbeiten können. 
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(z.B. über Drucker-Port) 
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Bild 35: DTP-System auf der Basis des Mega ST 


Bevor wir einen ganz wichtigen Begriff im DTP-Bereich, näm¬ 
lich PostScript, erläutern, möchten wir Ihnen noch die z.Zt. er¬ 
hältliche DTP-Software für den Mega ST vorstellen. Zugegeben 
- einige dieser Produkte erfüllen nicht ganz die oben erwähnten 
Vorgaben, kommen aber relativ nahe heran. Zumindest lassen 
sich grundlegende Techniken damit erlernen bzw. vollziehen. 


DTP-Software für den Mega ST 

Bekannt sind zur Zeit die folgenden Produkte, die sich zu "DTP" 
im weitesten Sinne als brauchbar erwiesen haben: der Publishing 
Partner von Soft Logic, Publisher ST von Softline, Calligrapher 
von Computer Concepts, Fleet Street Publisher von Mirrorsoft 
sowie Calamus der Firma DMC. Eine Lösung für Preisbewußte 
ist BECKERpage ST aus dem Programmangebot von DATA 
BECKER - das Programm liegt z.Zt. allen ausgelieferten Mega 
ST bei (in einer Grundversion). Der Typesetter Elite (Softline) 
ist ein einfaches, preisgünstiges Produkt ohne Anspruch von 
allzu viel Professionalität. 

Auch die Spezialisten von GFA Systemtechnik bemühen sich um 
den Einstieg in DTP - der GFA Publisher zeigte sich, zumindest 
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als Demo, recht beeindruckend einem staunenden Publikum. 
Indes ist das Programm zur Zeit noch nicht lieferbar. 

Einige der genannten Programme verfügen über Druckertreiber 
für marktübliche Laserdrucker, beispielsweise den LaserJet von 
Hewlett-Packard. Manche dieser Laserdrucker lassen sich mit 
Hilfe von PostScript und anderen ''Seitenbeschreibungssprachen" 
ansteuern. 

Viele Laserdrucker verwenden eine identische Technik, wie z.B. 
der HP-Laserjet. In diesem Drucker steckt eine von Canon ent¬ 
wickelte Maschinerie, die auch von anderen Herstellern einge¬ 
baut wird. Ein solcher Drucker läßt sich ohne Probleme am 
Mega ST verwenden - ist allerdings heute noch erheblich teurer 
als der Atari-Laserdrucker (in dem z.Zt. eine Maschine von TEC 
steckt). Betrieben wird ein fremder Laserdrucker ganz normal 
über serielle oder parallele (siehe dort) Schnittstelle, was Vor- 
und Nachteile hat. Für die Erstellung eigener Druckertreiber ist 
diese Lösung allerdings leichter, da ein herkömmlicher Laser¬ 
drucker über eigene "Intelligenz" verfügt. Dafür ist die Über¬ 
tragung von Druckdaten an den SLM804 durch den DMA-Port 
erheblich schneller. Nach Meinung von Experten geht der Trend 
in Richtung "dummer" Laserdrucker. Man kann das glauben oder 
nicht - wir tun es nicht. Welcher Rechner außer dem Mega ST 
bzw. der anderen ST-Modelle hat einen DMA-Port? Bedingung 
wäre zumindest eine Ansteuerung über die serielle oder parallele 
Schnittstelle. 

Der Einsatz des SLM804 wird zur Zeit von einigen DTP-Pro- 
grammen unterstützt. Dazu gehören Calamus und BECKERpage 
ST. Ältere Produkte, wie z.B. Publishing Partner, verfügen z.Zt. 
leider nicht über einen solchen Treiber. Ein solches Programm 
sowie die zahlreichen Textverarbeitungen können bisher immer¬ 
hin mit zusätzlicher Software "laserfähig" gemacht werden. Eine 
solche Hilfe ist beispielsweise das Programm Laserbrain. Dieses 
Utility sorgt für eine reibungslose Ansteuerung des SLM804 bei 
Programmen ohne Druckertreiber für den Atari-Laser. 
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2.3.4 Was ist PostScript? 

Wenn von DTP die Rede ist, taucht oft der Begriff PostScript 
auf. Eines sei gleich vorneweg gesagt: Mit dem Atari-Laser¬ 
drucker haben Sie mit PostScript nichts zu tun. Er benötigt es 
nicht. Andererseits - wissen sollte man schon, was es ist. Und 
wer einen "normalen" Laserdrucker benutzt - der muß es 
geradezu wissen. Und außerdem - es muß ja nicht unbedingt ein 
Drucker sein, der Ihre Dokumente zu Papier bringt. Es gibt 
Satzmaschinen, die sich direkt mit dem Produkt eines DTP-Pro- 
gramms füttern lassen, etwa eine Linotronic 100 oder 
Compugraphic 8000. Das Ergebnis kann dann geradewegs in den 
Druckprozeß wandern. Solche Satzmaschinen werden entweder 
mit eigenen Codes bzw. Steuerzeichen gefüttert - oder sie "ver¬ 
stehen" eine Sprache wie PostScript. Man spricht bereits von 
PostScriptkompatiblen Satzmaschinen. Für den professionellen 
Bereich ist dieser Weg wohl der ideale - für’s Sparen allerdings 
der falsche. PostScript und verwandte Sprachen werden aber 
auch von vielen Laserdruckern verstanden. Auch einige DTP- 
Programme für den Mega ST bzw. ST sind mit PostScript ausge¬ 
stattet, beispielsweise der Publishing Partner. 

PostScript ist eine sogenannte Page Description Language, auch 
als PDL abgekürzt, also eine Art "Seitenbeschreibungssprache". 
Weitere Sprachen dieser Art sind DDL, das in letzter Zeit von 
sich reden machte, sowie Interpress. Während DDL von der 
Firma Imagen kreiert wurde, stammt PostScript von Adobe 
Systems. Interpress schließlich ist eine Entwicklung der Xerox 
Corporation. Alle PDL-Anbieter sind in den USA beheimatet. 
Die einzige PDL, die z.Zt. auch mit relativ kostengünstigen 
Systemen eingesetzt wird, ist PostScript. Interpress beispielsweise 
wird mit hochwertigen Schnelldruckern eingesetzt, die mit Ge¬ 
schwindigkeiten von z.B. 120 Seiten/Minute zu Werke gehen. 
Mit etwa 70000 Dollar sind Sie dabei... Manche Drucker bringen 
es dabei auf über 2000 dpi (dpi = dots per inch, Punkte/Inch) 
Auflösung. Wenn man bedenkt, daß ein herkömmlicher Laser¬ 
printer (auch der SLM804) es auf ganze 300 dpi bringt... 
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Doch genug geträumt! Was kann PostScript uns bringen? Ein 
Drucker, der mit PostScript arbeiten kann und nicht gänzlich 
unbezahlbar ist, steht mit dem Apple LaserWriter zur Ver¬ 
fügung. Außerdem gibt es bereits Aufrüst-Kits für HP-LaserJet 
und ähnliche Geräte. Diese Geräte können über die serielle oder 
parallele Schnittstelle an den Mega ST angeschlossen werden, 
geeignete Software auf Rechnerseite vorausgesetzt. 

Wie funktioniert nun PostScript? Der Sinn ist, neben einer Stan¬ 
dardisierung im DTP-Bereich, daß der Drucker, mit seinen 
Zeichensätzen und einer Portion Rechenkapazität, die Seite er¬ 
stellt und ausdruckt, nicht der Rechner. Dazu gehört natürlich 
"Intelligenz" und hohe Speicherkapazität auf Druckerseite - 
beides ist beim Atari-Laser nicht vorhanden, weshalb man auf 
PostScript verzichten muß. 

Anstatt der sonst üblichen punktweisen Bildinformation erhält 
der Laserdrucker also Kommandos in Form eines PostScript- 
Programms. Dadurch werden "Stufen" aus grafischen Darstel¬ 
lungen "herausgebügelt" und Zeichensätze des Druckers ausge¬ 
wählt. Ein Kreis beispielsweise wird dem Drucker in Form von 
mathematischen Beschreibungen oder Parametern übergeben, der 
Drucker berechnet nun diesen Kreis und bringt ihn "stufenlos" 
zu Papier - ohne Verzerrungen etc. Es gibt dazu bereits 
hunderte von Zeichensätzen für PostScript-Drucker. 

Man kann in PostScript regelrecht programmieren - wie in jeder 
anderen Programmiersprache auch. Allerdings sollte ein gutes 
DTP-Programm die Umwandlung einer Seite in PostScript-An- 
weisungen automatisch vornehmen. Manchmal wird dieser Vor¬ 
gang aber auch separat durchgeführt - also erst nach dem Er¬ 
stellen der Seite(n) auf dem Bildschirm. PostScript ist eine 
"stackorientierte" Interpreter-Sprache, ähnlich wie LISP oder 
FORTH - lesen Sie mehr hierzu unter "Programmieren mit dem 
Mega ST". 

Sie sehen also, daß man mit PostScript eine ganze Menge an¬ 
fangen kann. Aber sind Sie nicht traurig, wenn Sie zur großen 
Mehrheit der Mega ST-Benutzer ohne PostScript gehören. Denn 
es gibt auch Negatives zu berichten: Der Ausdruck einer stark 
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grafisch "belasteten" Seite kann wegen des langwierigen 
Decodierens eines PostScript-Dokumentes unter Umständen 
Stunden dauern. Leider reicht hier der Platz nicht für eine 
weitere Vertiefung in PostScript - viele DTP-Fachbücher helfen 
hier kompetent weiter. 


DTP in der Praxis 

Wie bereits angesprochen, so muß der DTP-Neuling sich intensiv 
mit bisher oft ungewohnten Dingen auseinandersetzen. Es genügt 
nämlich nicht, kurzerhand ein paar Grafiken zu laden, den Text 
drumherum einfließen zu lassen und dann den Laser anzu¬ 
werfen. Vorher sind einige wichtigen Entscheidungen zu treffen. 
Wohin sollen die Grafiken? Wie viele auf einer Seite? Welche 
Schrift soll verwendet werden? Welcher Zeilenabstand ist an 
welcher Stelle des Dokumentes gewünscht? Wie breit sollen die 
Textspalten werden? Welcher Schriftgrad ist am günstigsten zu 
welchem Zweck? Schon haben wir einen neuen Begriff gelesen - 
Schriftgrad! Die verwendete "Maßeinheit" ist hier der Punkt. 
Und der ist genau festgelegt - bestimmt die Anzahl der Punkte 
doch, wie groß und dick eine Schrift erscheint. Da wimmelt es 
in der Fachliteratur nur so von 8-, 10- oder 14-Punkt-Schriften. 

Welche Schrift Sie verwenden, hängt davon ab, was Ihr Drucker 
kann. Im Interesse eines korrekten WYSIWYG sollte auch der 
Computer eine Schrift richtig darstellen können. Dicke Bücher 
sagen Ihnen, was für Schriften es so gibt. Darf es Times Roman 
sein? Oder vielleicht die dicke Helvetica mit 24-Punkt? Sie 
sehen - DTP beginnt schon vor dem ersten Kontakt mit der 
Tastatur. Times und Helvetica dürften zur Zeit die meistver- 
wendeten Schriftarten sein. Wichtig ist aber auch, welchen Ab¬ 
stand Sie für den oberen und unteren Seitenrand vorsehen, wo 
Sie die Seitenzahl hinsetzen, wie viele Spalten Sie haben möchten 
oder wie groß Abbildungen im Text sein sollen. Diese Dinge 
wollen wir hier aus Platzgründen nicht weiter vertiefen - ver¬ 
wenden Sie hierzu die einschlägige Fachliteratur. Und bedenken 
Sie immer, daß ganz unwichtig erscheinende Details eine Seite 
im Aussehen schon erheblich beeinträchtigen - oder verbessern 
können. 
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2.3.5 Desktop Publishing mit BECKERpage ST 

Wir wollen Ihnen nun noch zeigen, wie man grundsätzlich mit 
einem DTP-Programm umgeht. Als Beispiel wählten wir 
BECKERpage ST - weil dieses Programm jedem Mega ST bei¬ 
gelegt wird. 

Bevor BECKERpage gestartet wird, sollten die benötigten Texte 
und Abbildungen vorliegen. Zwar verfügt das Programm über 
eine integrierte Textverarbeitung, jedoch sollte man ein "echtes" 
Programm dieser Art vorziehen. Formatierungs- und Gestal¬ 
tungsdetails wie Fettschrift, Absätze, gar Steuerzeichen oder 
Trenn Vorschläge des verwendeten Textprogramms sollten Sie 
möglichst weglassen. Schreiben Sie Ihren Text "ohne alles" - als 
reiner Fließtext, auch ohne Seitenformatierungen, ist er am 
besten von BECKERpage ST zu bearbeiten. Abbildungen können 
in verschiedenen Formaten vorliegen. Besonders zu empfehlen ist 
das Degas-Format des gleichnamigen Grafikprogramms, das auch 
von anderen Grafik-Applikationen verwendet wird. 

Nach dem Start von BECKERpage ST erscheint der Arbeits¬ 
bildschirm mit einem Dokumenten-Fenster. Dieses hat noch 
keinen Titel, den bekommt es erst, wenn Sie eine Datei mit 
einem zu wählenden Namen abspeichern. Sie können nun mit 
dem Layout einer Seite beginnen. Natürlich probieren Sie nicht 
einfach herum, sondern haben sich zuvor überlegt, welche Ab¬ 
messungen das Dokument bekommen soll. Sie können nun die 
Anzahl der Textspalten wählen sowie den Abstand zwischen 
diesen Spalten festlegen. Außerdem kann festgelegt werden, wie 
groß der Abstand der Spalten vom oberen Rand sein soll. Durch 
Verwendung des am linken Bildschirmrand befindlichen Symbols 
"IMG" mittels Mausklick können Sie dann hingehen, und auf 
dem Fenster einen rechteckigen Rahmen aufziehen. In diesem 
soll eine Abbildung plaziert werden. Übrigens: BECKERpage 
erlaubt selbstverständlich, einen bestimmten Seitenbereich durch 
"Zoomen" zu vergrößern, um so die Arbeit zu erleichtern. Die 
Darstellung der gesamten Seite dient lediglich dem Überblick, 
auch wenn durchaus Aktionen möglich sind. Da bei dieser Art 
der Darstellung viele Details nicht erkennbar sind, ist dies je- 
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doch nicht zu empfehlen. Ideal wäre natürlich ein teurer Ganz- 
seiten-Bildschirm, ohne diesen kann DTP immer nur unvoll¬ 
kommen sein. 


Grafik einbinden mit BECKERpage ST 

BECKERpage kann eine Reihe unterschiedlicher Grafikformate 
verwenden. Die meisten bekannten Grafikformate werden 
unterstützt. Steht kein Grafikprogramm zur Verfügung, kann 
auch ein Accessory wie Snapshot(wird mit dem Textprogramm 
Ist Word Plus geliefert) verwendet werden, um Bildschirminhalte 
als Grafik auf Diskette abzulegen. Natürlich können auch be¬ 
liebige Bilder oder Grafiken mit einem Scanner als Datei ge¬ 
speichert und im Format eines der gängigen Grafikprogramme 
verwendet werden. 

A Datei Seite Block Anzeige Grafik Text Edit 



Bild 36: Einbinden von Grafik mit BECKERpage ST, gut zu sehen auf der 

rechten Seite die noch leeren Textspalten 




































































116 


Das große Mega-ST-Buch 


Der oben erwähnte rechteckige Rahmen wird einfach durch 
Klicken auf den in der links sichtbaren Symbolleiste befind¬ 
lichen Pfeil und anschließendes Klicken auf den Rahmen 
markiert. Danach sorgt ein Rollmenü für das Laden einer be¬ 
liebigen Grafik von Festplatte oder Diskette. Bei den ersten 
Versionen von BECKERpage ST ist zu empfehlen, zuerst die 
Grafik und erst später den Text zu laden. Es kann Vorkommen, 
daß die Grafik sonst in einer Textspalte landet. Ist die Grafik 
auf dem Bildschirm erschienen (die Darstellung kann manchmal 
etwas fehlerhaft aussehen, vor allem im Modus "Ganze Seite"), 
besteht die Möglichkeit, sie in Höhe, Breite usw. anzupassen. 
Dazu genügt ein Klick auf einen Menüpunkt im Desktop. 
Außerdem kann ein Grafik-Block natürlich auf einer Seite 
bewegt und an einen beliebigen Ort verschoben werden. Damit, 
sind die Beeinflussungsmöglichkeiten der Grafik aber auch schon 
erschöpft. Das eigentliche Anpassen muß vor dem Einbauen in 
das DTP-Dokument mit einem Grafik-Programm erfolgen. 


Text einbinden 

Nach dem Laden einer oder mehrerer Grafiken soll nun der 
Text selbst in das Dokument eingefügt werden. Liegt noch kein 
Text vor, bietet BECKERtext eine ziemlich einmalige Leistung: 
den Blindtext. Es besteht die Möglichkeit, den sogenannten 
Blindtext in die vordefinierten Textspalten einzufügen. Was 
Blindtext ist, haben wir weiter oben bereits erläutert. Statt des 
Blindtextes darf es natürlich auch der "richtige" Text sein. Ideal 
ist ein reiner ASCII-Fließtext, wie ihn die meisten Textver¬ 
arbeitungen zur Verfügung stellen. Egal, ob es nun Blindtext ist 
oder der "echte" - der Text wird in die vordefinierten Spalten 
eingefügt. Er "fließt" in die Spalten und "um die Grafiken" 
herum. Probleme gibt es mit solchen Texten, die bereits Trenn¬ 
vorschläge oder Steuerzeichen enthalten. Manchmal müssen diese 
mühselig entfernt werden. Mit einem ASCII-Text hat man solche 
Probleme gottlob nicht. Praktisch läuft das Laden des Textes 
genauso ab wie bei der Grafik beschrieben - diesmal durch An¬ 
klicken des Text-Icons und anschließendes Markieren der ersten 
Textspalte, in die der Text gehört. 
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Damit der Text nicht nur in die markierte Spalte eingefügt wird, 
kann man sogenannte Pipes setzen. Darunter kann man sich Ver¬ 
bindungen zwischen den Textspalten eines Dokumentes vorstel¬ 
len. Diese sorgen dann dafür, daß der Text, der nicht mehr in 
die erste Spalte paßt, auf die folgenden verteilt wird. Ohne die 
Pipes wäre man also recht arm dran. 


Datei Seite Block Anzeige Grafik Text Edit TEXT 
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Bild 37: Mit Fließtext kann erst einmal am Layout gearbeitet werden 


Ist der Text endlich eingebunden, kann es ans Gestalten gehen. 
Jetzt können Sie Initialen (die Anfangsbuchstaben eines Kapitels) 
in großer Schrift setzen, Fettschrift für bestimmte Absätze oder 
Überschriften wählen oder gar den gesamten Text mit einer 
neuen Schriftart versehen. Markieren des zu verändernden 
Textes und anschließendes Klicken in ein Rollmenü bzw. eine 
Dialogbox genügen. Auch das Trennen des Textes kann nun er¬ 
folgen. Die meisten Dokumente werden ja im Blocksatz erstellt, 
der die gesamte Breite einer Zeile beansprucht. Hier passiert es 
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natürlich oft, daß ein Wort nicht ganz in die Zeile paßt - es 
muß getrennt werden. BECKERpage ST trennt automatisch, er¬ 
laubt aber auch eigene Vorschläge. 

Leider bleiben eine Reihe von Forderungen auch bei BECKER¬ 
page ST auf der Strecke, schon aus Kostengründen. Dennoch 
kommt das Programm professionellen Ansprüchen zumindest 
nahe, wie die weiter unten folgende Abbildung einer mit 
BECKERpage erstellten Seite zeigt. Für halbprofessionelle oder 
private Anwender reicht es hingegen völlig aus. Gleiches gilt für 
die anderen oben erwähnten DTP-Produkte. Übrigens - in 
letzter Minute erfuhren wir, daß auch die englische Software¬ 
schmiede GST ein DTP-Programm kreiert hat, den GST- 
Publisher. Offenbar hat Desktop Publishing auf dem Mega ST 
eine echte Chance. Ein billiger Ganzseiten-Bildschirm ist jedoch 
dringend erforderlich, wer baut ihn? 
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Liebe Computerfreunde. 


das sehnlichst erwartete "Amiga Intern", ein 
Unix-ähnlicher C-Compiler für den ATARI ST. 
ein "GEOS-BASIC" für den C64, neue Desk- 
top-Publishing-Bücher im attraktiven Großfor¬ 
mat - im vorliegenden Katalog werden Sie 
wieder Neuheiten rund um Ihren Computer 
finden! 

Und noch etwas neues können wir vermelden, 
nachdem wir beim letzten Mal verkündet ha¬ 
ben. weitgehend auf Kopierschutz zu verzich¬ 
ten: DATA BECKER bringt jetzt zunehmend 
Farbe auf die Buchtitel, packt Bücher in fe¬ 
ste. strapazierfähige Hardcover und fügt - 
wo interessant - gleich die Diskette mit hinzu. 
Nicht, daß wir bisher etwas gegen optisch 
schöne Aufmachung gehabt hätten, nur lag 
uns eben der letztendlich entscheidene Inhalt 
immer deutlich mehr am Herzen als die Ver¬ 
packung. Daran wird sich auch in Zukunft 
nichts ändern, trotz oder gerade wegen der 
besseren Aufmachung. 



Dr Achim Becker 
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2.4 Programmieren mit dem Mega ST 

Wer einen Computer hat, muß diesen nicht unbedingt selbst pro¬ 
grammieren - aber er kann! Und obwohl für fast jede denkbare 
Anwendung bereits sehr gute bis hervorragende Software 
existiert, sind die eigenen Programmierkünste immer von 
Nutzen. Ob aber ein kleines Programm zum Sortieren irgend¬ 
welcher Daten, ein ebenso kleines zum Übertragen von Daten 
zwischen dem Mega ST und dem IBM PC im Büro oder gar ein 
professionelles Softwareprodukt Ihr Ziel ist: Sie benötigen dazu 
eine Möglichkeit, Ihre Vorstellungen dem Computer in einer ihm 
verständlichen Form, einem Code, mitzuteilen. Nur so kann er 
später nach Ihren Wünschen eine mehr oder weniger komplexe 
Aufgabe wieder und wieder korrekt ausführen. 

Zum Programmieren benötigt man also eine Programmiersprache. 
Natürlich sind zur Bewältigung einer Programmieraufgabe 
Kenntnisse im Umgang mit einer solchen Sprache unabdingbar, 
ganz zu schweigen davon, daß man sich mit den grundsätzlichen 
Regeln der Programmierung vertraut machen sollte. Besonders 
mit dem "strukturierten" Programmieren kann man sich nicht 
genug befassen. Ebenso wichtig wie die Kenntnis der Grund¬ 
lagen sauberer Programmierung ist allerdings die Auswahl der 
geeigneten Sprache, denn es gibt eine ganze Menge davon. 
Manche sind einander ähnlich, andere sind völlig eigenständige 
Konzeptionen - gemäß dem Bereich, in dem sie jeweils am 
optimalsten eingesetzt werden können. Im folgenden möchten 
wir Ihnen die wichtigsten mit dem Mega ST einsetzbaren Pro¬ 
grammiersprachen kurz vorstellen und Tips für eine Kaufent¬ 
scheidung geben. 


2.4.1 Assembler, Interpreter und Compiler 

Bevor wir uns mit den Programmiersprachen selbst auseinander¬ 
setzen, sollen noch einige grundsätzliche Dinge geklärt werden. 
Programmiersprache und Programmiersprache sind nicht ein- 
und dasselbe. So spricht man beispielsweise von Interpretern und 
Compilern. Was ist das? 
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Jedes Programm, gleich in welcher Sprache es geschrieben wird, 
besteht aus einer Reihe logisch verknüpfter Anweisungen, der 
ein sogenannter Algorithmus zugrunde liegt. Die Anweisungen 
werden in der Syntax einer Programmiersprache z.B. mit ;i einer 
Textverarbeitung oder einem integrierten Editor eingetippt und 
als Datei abgespeichert. Im Grunde ist ein Programm ursprüng¬ 
lich also nichts anderes als ein Text. Die weitere Verarbeitung, 
nämlich die Verwandlung dieser Textdatei in ein lauffähiges 
Programm, erfolgt nun entweder mit einem Interpreter oder mit 
einem Compiler. Beide haben die gleiche Aufgabe: Die An¬ 
weisungsdatei, das Listing, in Maschinensprache zu übertragen, 
also in Folgen von 0 und 1, das einzige, was ein Computer bzw. 
dessen Prozessor eigentlich verstehen und ausführen kann. Nur 
die Art und Weise, in der dies geschieht, ist verschieden. 


Interpreter 

Am Beispiel des ST-BASIC wollen wir den Begriff des Inter¬ 
preters kurz erläutern. ST-BASIC wird jedem Mega ST beigelegt 
und arbeitet vollständig unter GEM. Ruft man das ST-BASIC 
durch Klicken auf das entsprechende Programmsymbol auf, wird 
auch der Interpreter mitgeladen. In einem der Bildschirmfenster 
wird das Programmlisting geschrieben bzw. editiert, in einem 
anderen wird das fertige Programm ausgeführt bzw. getestet. 
Dieses Testen, bei dem man das Programm jederzeit unter¬ 
brechen und Änderungen am Listing (der sogenannte Quelltext, 
engl. Source) vornehmen kann, ist nur mit einem Interpreter 
möglich. Wieso? Nun, nach dem Starten des Programms übersetzt 
der Interpreter Zeile für Zeile die Anweisungen des Listings in 
Maschinensprache, und der Computer führt sie aus. Bei jedem 
neuen Aufruf eines BASIC-Programms wird dieser Ablauf 
wiederholt. BASIC-Kommandos kann man auch direkt eingeben 
und mit Return an den Interpreter übergeben, dann werden sie 
sofort übersetzt und ausgeführt. 


Compiler 

Im Gegensatz zum Interpreter ist der Compiler ein separates 
Programm, das extra aufgerufen werden muß. Auch bei Ver- 
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wendung eines Compilers wird der Programmtext in den Com¬ 
puter eingetippt und als Datei auf Diskette oder Harddisk ge¬ 
speichert. Dann aber wird der Compiler auf gerufen, der den 
kompletten Programmtext mehr oder weniger in einem Rutsch in 
Maschinensprache übersetzt und auf der Diskette ablegt. Im 
Gegensatz zum Interpreter, der bei jedem neuen Aufruf des 
Programms in Aktion tritt, kann das Übersetzen in Zukunft ge¬ 
spart werden - das compilierte Programm ist alleine lauffähig. 
Bei einem normalen BASIC-Programm muß man vor dem 
eigentlichen Programm wieder den Interpreter laden. Ein compi- 
liertes Programm ist erheblich schneller als ein interpretiertes - 
der Übersetzungsvorgang entfällt ja. 

Der Nachteil eines Compilers soll nicht verschwiegen werden: 
Ein einmal compiliertes Programm läßt sich nicht mehr ver¬ 
ändern bzw. bis zu einem bestimmten Punkt ausführen, unter¬ 
brechen, editieren und dann fortführen. Zu diesem Zweck muß 
erst wieder der Quelltext geladen, mit einem Editor bearbeitet 
und dann erneut compiliert werden. Das ist unangenehm, denn 
der Compiliervorgang dauert in der Regel recht lange. Beim 
Austesten eines Programms kann das sehr lästig werden. Der 
Geschwindigkeitsvorteil bei der Ausführung hebt die Nachteile 
jedoch meist auf. Übrigens benötigt ein Compiler eine Menge 
Speicherplatz. In der Regel legt er eine ganze Reihe temporärer 
Dateien an, die im Laufe des Compilierens wieder gelöscht 
werden. Bei größeren Projekten geht dergestalt viel Speicher 
verloren, daß man selbst auf dem 1040 ST mit 1 MByte RAM in 
die "Enge" geraten konnte. Da blieb nichts anderes übrig, als den 
Quelltext "häppchenweise" zu compilieren und später die ent¬ 
standenen Programmfragmente (Objektdateien) mit einem 
weiteren Programm, einem sogenannten Linker, miteinander zu 
verbinden. Den Linker benötigt man bei den meisten Compiler- 
Implementationen ohnehin, um beispielsweise Daten aus Unter¬ 
programmbibliotheken in das Programm einzubinden. 


Assembler 

Auch in Maschinensprache läßt sich programmieren. Kein nor¬ 
maler Mensch würde allerdings versuchen, ein Programm als 
eine Reihe von Nullen und Einsen zu schreiben. Zur Er- 
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leichterung erfand man daher die Assemblersprache, die direkt 
der Maschinensprache entspricht. Nur werden alle Befehle (jeder 
Prozessor hat seinen eigenen Befehlssatz) sowie Register und 
Systemadressen als Codeworte bzw. mit symbolischen Namen 
dargestellt. Das gilt auch für Werte, die beispielsweise von einem 
in ein anderes Register geladen werden. Ein Listing in As¬ 
semblersprache wird ebenfalls mit einem Editor oder Textsystem 
erstellt. Die Übersetzung in die eigentliche Maschinensprache, 
also in unsere Nullen und Einsen, erfolgt dann mit einem As¬ 
sembler. Dieser Vorgang wird als Assemblieren bezeichnet. 

Umgekehrt kann man natürlich ein Maschinenprogramm auch 
wieder in ein Assemblerlisting verwandeln. Hierzu dient ein so¬ 
genannter Disassembler. Generell kann man sagen, daß in As¬ 
sembler geschriebene Programme am schnellsten arbeiten, auch 
schneller als compilierte. Die letzteren sind meist weniger opti¬ 
mal in Maschinensprache übersetzt, als es ein guter Assembler¬ 
programmierer mit einem Assembler schafft. Der Compiler 
benötigt einfach mehr Befehle und arbeitet oft umständlicher. 
Wer zeitkritische Aufgaben lösen will, sollte sich mit der 
Assemblerprogrammierung befassen. Das ist nicht leicht, aber 
mit der Zeit findet man sich zurecht. Zur Anwendung der in 
diesem Buch veröffentlichten Assemblerprogramme genügt aller¬ 
dings das bloße Abtippen - wer aber ist damit schon zufrieden? 
Ein kleiner Tip: Einer der besten erhältlichen Assembler ist der 
KSEKA von Kuma. Wann fangen Sie an, in 68000er-Assembler 
zu programmieren? 


2.4.2 Welche Programmiersprache für den Mega ST? 

Kaum eine der bekannteren Programmiersprachen ist nicht auf 
dem Mega ST einsetzbar. Welche aber soll man einsetzen? Soll 
man vielleicht mehrere benutzen, je nach Anwendung? Wer be¬ 
reits in einer Programmiersprache gearbeitet hat, wird sich viel¬ 
leicht in eine weitere einarbeiten wollen. Der Einsteiger hat aber 
entweder gar keine oder nur geringe Programmierkenntnisse. 
Was soll er also tun? 
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Es ist in der Tat entscheidend für den Erfolg, mit welcher 
Sprache der Neuling beginnt. Bei der folgenden Vorstellung von 
Programmiersprachen wird auf die Eignung für Einsteiger 
eingegangen. 


BASIC - Vorsicht, bitte! 

Als Einsteigersprache schlechthin, da leicht zu erlernen, gilt 
BASIC in allen seinen Implementationen. Das ursprüngliche 
BASIC (Beginners All purpose Symbolic Instruction Code) wurde 
1961 am amerikanischen Darthmouth College entwickelt und 
später vom Microsoft-Gründer Bill Gates auf Mikrocomputern 
heimisch gemacht. Die Kommandos sind der englischen Sprache 
entnommen und meist leicht verständlich: Print heißt "Drucken", 
"Anzeigen", Gosub heißt "gehe zum Unterprogramm (subpro¬ 
gram)" usw. BASIC ist eine Interpretersprache (s.o.), allerdings 
gibt es auch BASIC-Compiler. Mit BASIC kann man fast alles 
programmieren, und mit einer Compiler-Version lassen sich 
recht ansehnliche Geschwindigkeiten erreichen. 

Allerdings gibt es erhebliche Nachteile. BASIC verleitet nämlich 
zum "Spaghetticode". Dieser entsteht unweigerlich, wenn man 
nicht exakte Programmablaufpläne erstellt und sich später auch 
daran hält. Im Gegensatz zu anderen Programmiersprachen kann 
man in BASIC die Situation durch wilde Sprungkombinationen 
scheinbar klären, wenn man sich beim Programmieren mal "ver- 
franst" hat. Gerade BASIC verlangt also eine erhöhte Disziplin 
des Programmierers. Dennoch gibt es keinen Grund, warum sich 
der Einsteiger nicht mit BASIC in die Computerei stürzen sollte. 
Das mitgelieferte ST-BASIC ist allerdings weniger zu empfehlen. 

Normalerweise arbeitet BASIC mit Zeilennummern, die mit 
zunehmender Programmlänge immer höher werden. Werden 
später Programmänderungen vorgenommen, muß das gesamte 
Listing daher neu numeriert werden. Hierfür gibt es den Befehl 
"Renumber". Beim bekannten GFA-BASIC ist das allerdings 
anders. Die Zeilennummern entfielen bei dieser BASIC-Version 
zugunsten einer strukturierten Programmierweise. Weil der Pro¬ 
grammierer regelrecht zu planvollem Vorgehen gezwungen wird, 
ist GFA-BASIC dem Einsteiger sehr zu empfehlen. Gleiches gilt 
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für ähnlich angelegte BASICs, z.B. für TrueBASIC und 
Omikron-BASIC. Bei diesen Versionen kann man sogar ent¬ 
scheiden, ob man mit oder ohne Zeilennumerierung arbeiten 
will. GFA-, Omikron- oder TrueBASIC haben eine gewisse 
Ähnlichkeit mit der im folgenden beschriebenen Sprache, Pascal. 
Daher fällt der spätere Umstieg zu dieser Programmiersprache 
relativ leicht. Gleiches gilt für Modula, eine weitere Program¬ 
miersprache. Übrigens verzichtet auch die BASIC-Implementa- 
tion HiSoft BASIC auf Zeilennummern und stellt dem Program¬ 
mierer leistungsfähige Funktionen zur strukturierten Program¬ 
mierung zur Verfügung. Zu TrueBASIC wäre noch zu erwähnen, 
daß es von den gleichen Leuten geschaffen wurde, die auch das 
erste aller BASIC im Darthmouth College "auf dem Gewissen" 
haben - John G. Kemeny und Thomas E. Kurz. Sie hatten dabei 
das Ziel vor Augen, endlich einen Standard für BASIC zu 
etablieren. 

Etwas schlechter sieht der Einstieg in diese neuen BASICs aus, 
wenn man zuvor mit ST-BASIC gearbeitet, oder auf einem 
anderen Rechner in BASIC programmierte. Zwar lauten viele 
Kommandos ähnlich, werden jedoch verschieden eingesetzt. Dies 
gilt vor allem bei Schleifenkonstruktionen oder Unterprogram¬ 
men bzw. Prozeduren. So fällt der Umstieg nicht ganz so leicht. 
Immerhin bieten viele BASIC-Versionen aber die Möglichkeit, 
bereits vorhandene Programme vom IBM PC oder anderen 
Rechnern zu übertragen. Kompatibilitäten zeigen sich besonders 
bei HiSoft BASIC, da Programme in den PC-Dialekten GW- und 
QuickBASIC sowie in ST-BASIC übernommen werden können. 
Die dort vorhandenen Zeilennnummern fungieren hier als Label, 
zu denen verzweigt bzw. gesprungen wird. Ein Label bezeichnet 
ein "Sprungziel" in einem Programm, beispielsweise serial für 
eine Unterroutine zur Bedienung der seriellen Schnittstelle. 
TrueBASIC-Programme lassen sich sogar auf dem Apple 
Macintosh ausführen, ST-BASIC ist auf das GW-BASIC von 
IBM PC und Kompatiblen übertragbar. 

Wem es genügt, mit ST-BASIC zu arbeiten und dabei auf 
leistungsfähige Möglichkeiten zur Anwendung von GEM- und 
anderen Funktionen zu verzichten, der sollte sich zumindest an¬ 
gewöhnen, Schleifen durch entsprechendes Einrücken deutlich zu 
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machen. Dieses Vorgehen erleichtert das Verständnis eines 
Listings. Im folgenden Beispiel haben wir dies durch ent¬ 
sprechend eingefügte Leerzeichen erreicht: 

1000 'Beispiel BASIC 

1010 'Unterprogramm Sortieren 

1011 'in ST-BASIC 

1012 ' 

1020 for i=1 to n-1 
1030 for j=i+1 to n 
1040 if x(i) < x(j) then 1080 

1050 b=x(i) 

1060 x(i)=x(j) 

1070 x(j)=b 

1080 next j 
1090 next i 
1100 return 


Bild 39: Beispiel für ein Unterprogramm in ST-BASIC 


Strukturiert mit Pascal 

Sehr beliebt ist das vom Schweizer Nikolaus Wirth geschaffene 
Pascal. Es erlaubt die Erstellung schneller Programme und 
arbeitet normalerweise mit einem Compiler. Auch Pascal erlaubt 
strukturiertes Programmieren, zwingt den Programmierer regel¬ 
recht dazu. Der Einstieg in Pascal ist weit weniger schwierig als 
im allgemeinen angenommen wird. Auch wenn der Einstieg 
etwas mühsamer ist als der in BASIC so sollte Pascal der Vorzug 
gegeben werden. Pascal erlaubt rekursives Programmieren, also 
z.B. den Einsatz eines Unterprogramms, das sich selbst aufrufen 
kann, ohne daß es Komplikationen gibt. 

Weiterhin kann man in Pascal eigene Datentypen definieren. 
Bezüglich der Variablen, also der Platzhalter für bestimmte 
Werte, ist wichtig zu wissen, daß gleiche Variablennamen in 
verschiedenen Unterprogrammen verwendet werden können, 
ohne daß es sich um die gleiche Variable handelt. Dies ist ein 
großer Vorteil gegenüber BASIC. Für den Mega ST, der sich 
wegen seiner großen Speicherkapazität auch zum Compilieren 
umfangreicher Pascal-Listings eignet, gibt es bereits einige 
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interessante Pascal-Versionen. Am bekanntesten dürfte das ST 
Pascal sein, das von Atari vertrieben wird. Ein kleines Beispiel 
zeigt die typische Struktur eines Programms in Pascal. Es handelt 
sich um die gleiche Sortiermethode wie oben in BASIC demon¬ 
striert, den sogenannten Bubble-Sort: 

proc (* b.sort *) sort(var...); 

var i # j: integer;b: real; 
begin (* proc.b.sort *) 

for i:= 1 to n-1 do 
for j:= i + 1 to n do 
begin 

if x(i) > x(j) then 
beg i n 
b:= x(i); 
x(i):= x(i); 
x(j):= b 
end 

end (* for...*) 
end (* procedure b.sort); 


Bild 40: Nochmal sortieren - diesmal in Pascal 


Wirth's Nachwuchs - Modula 2 

Mit der Erfindung von Pascal ließ es Nikolaus Wirth nicht be¬ 
wenden - Modula oder Modula 2 ist das Ergebnis seiner Be¬ 
mühungen. Ausgestattet mit den hervorragenden Eigenschaften 
seiner ersten Schöpfung Pascal, sollte Modula diese zu einer 
möglichst universell einsetzbaren Programmiersprache fortent¬ 
wickeln. Zweifellos ist dies gelungen. Was kaum einer weiß: Der 
Arbeitsplatzrechner "Lilith", der erstmals unter Modula lief, war 
eines der ersten Systeme mit grafischer Benutzeroberfläche und 
angeschlossener Maus zur Bedienung des Systems - damals noch 
zu astronomischen Preis. 

Modula 2 ist die letzte Modula-Version, weshalb die Freaks 
dieser Sprache meist nur kurz von Modula sprechen. Wenn Sie 
also unbedingt als "Kenner" auftreten wollen: Reden Sie nur von 
Modula und lassen Sie die 2 weg! Doch Spaß beiseite - was 
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macht den eigentlichen Reiz, den Vorteil von Modula aus? Dies 
ist schnell beantwortet: der modulare Aufbau eines Programms! 
Ein Modula-Programm besteht aus einer Reihe sogenannter 
Module, praktisch einem Baukasten ähnlich. Daten werden je 
nach Bedarf "importiert" oder "exportiert". Entsprechende An¬ 
weisungen zeigen dem Laien schon optisch den Unterschied zu 
Pascal. Von Vorteil ist, daß die einzelnen Module völlig unab¬ 
hängig voneinander entwickelt werden können. Deshalb wird die 
Sprache besonders gerne bei größeren Programmierprojekten 
eingesetzt, woran häufig ein ganzes Team beteiligt ist. Ohne 
Kenntnis des Gesamtprogrammkomplexes kann ein Program¬ 
mierer die gewünschte Programmroutine bzw. ein Modul ent¬ 
wickeln - Mißverständnisse bleiben später aus. 

Jeder, der mit Pascal zurechtkam, wird auch mit Modula gut 
auskommen. Der Einsteiger wird sich ebenfalls zurechtfinden - 
ist er in der Lage, konzentriert an Modula heranzugehen. 
Implementationen für den Mega ST gibt es bereits: Als Beispiel 
sei das TDI Modula ST genannt. Allerdings: Viele wichtige 
Unterprogramm- bzw. Modulbibliotheken müssen hinzugekauft 
werden, was ins Geld geht. Jedem Einsteiger kann dennoch un¬ 
eingeschränkt zu Modula geraten werden. Übrigens sind viele 
bekannte Software-Produkte komplett in Modula geschrieben, 
ein Beweis für die Bedeutung dieser Sprache. Als Einsteiger¬ 
literatur eignet sich besonders "Programmieren in Modula 2", 
erschienen beim Springer-Verlag, nicht zu verwechseln mit 
einem gleichnamigen Verlag. 


C - der ST-Standard? 

Vor allem zu Beginn der "ST-Ära" gehörte es zum guten Ton, 
mit C umgehen zu können. Viele der ersten ST-Programme 
waren in C verfaßt, dieser von Kernighan und Ritchie ent¬ 
wickelten Programmiersprache. Auch heute kann man dieser 
Sprache, die zumindest rudimentäre Ähnlichkeit mit Pascal hat, 
ihre Berechtigung nicht absprechen. Im Gegensatz zu Pascal oder 
Modula hat C allerdings nur recht wenige normierte Befehle 
,bzw. Syntax-Elemente. Viele Funktionen müssen vom Anwender 
selbst aus einfacheren Operationen zusammengestellt und neu 
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definiert werden. Für den Nichtbeteiligten kann ein C-Pro- 
gramm deshalb nahezu unleserlich sein. Gute Dokumentation ist 
hier besonders wichtig. 

Ein Vorteil von C ist die "Maschinennähe" der Sprache. Dies 
kommt besonders bei zeitkritischen Anwendungen zum Tragen. 
Auch das Einbinden von Assemblerroutinen ist leicht möglich. 
Allerdings ist C für den Einsteiger nicht leicht zu erlernen. Hat 
man allerdings die ersten Klippen überwunden, steht ein 
mächtiges Werkzeug zur Verfügung. Besonders die Program¬ 
mierung von Anwendungen unter Einbeziehung der GEM- 
Benutzeroberfläche ist relativ schwierig. Anfänger sollten sich 
zuerst einmal mit reinen TOS-Programmen ohne GEM be¬ 
gnügen. Jedem C-Einsteiger sind die Bücher "Atari ST, C für 
Einsteiger", erschienen im Verlag DATA BECKER, sowie "C- 
Programmierung unter TOS, Atari ST", erschienen im Verlag 
Markt & Technik, zu empfehlen. Hier lernt man C von "der 
Pike" auf. Der Fortgeschrittene findet Unterstützung in "Pro¬ 
grammieren in C", einem bei Hanser erschienenen Buch der 
Autoren dieser Sprache. 

Wie Pascal oder Modula ist auch C eine Compilersprache. 
Bekannte und leistungsfähige C-Compiler für den Mega ST sind 
der Megamax-C-Compiler, der Lattice-C-Compiler sowie der 
Compiler von Metacomco. Geeignet ist auch der C-Compiler des 
sogenannten "Entwicklungspaketes" von Atari, der von Digital 
Research entwickelt wurde. Jeder, der seine Programme auf 
andere Rechner als den ST übertragen will, sollte sich mit einem 
dieser Pakete "eindecken" - C ist nämlich portabel, wie man 
sagt. Ein C-Programm verwendet gleiche Befehle auf allen 
Rechnern - "getChar" bleibt "hole Zeichen", ob MS-DOS-PC, 
Amiga oder Mega ST! In der jüngsten Zeit ist C allerdings in 
der Beliebtheitsskala wieder etwas zurückgefallen, offenbar eine 
Folge des großen Erfolges von GFA-BASIC, mit dem sich auch 
für weniger erfahrene Programmierer alle Funktionen des Mega 
ST bzw. Atari ST nutzen lassen. Für den professionellen Ent¬ 
wickler bleibt C neben Modula und Assembler weiterhin erste 
Wahl. 
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extern long gemdosO; 

mainO 

{ 

/* Kleines Beispiel in C */ 

printf("Dies ist ein kleiner Gruß\n"); 
printfC'von Ihrem C-Compi ler\n"); 

gemdos(0x1); 

> 

Bild 41: Einfaches Beispiel für ein C-Programm 


Was gibt es noch? 

Wie schon erwähnt, gibt es kaum eine Sprache, die nicht auf 
dem Mega ST implementiert wurde. Interessant sind z.B. Forth 
und Lisp. Letztere hat eine gewisse Bedeutung im Bereich der 
"künstlichen Intelligenz". Forth hingegen überläßt es dem An¬ 
wender, eigene Funktionen zu programmieren und mit Namen 
zu versehen - als Folge davon kann kaum ein Außenstehender 
etwas mit einem fremden Forth-Listing anfangen. Forth wurde 
ursprünglich zur Steuerung eines Radioteleskops entwickelt und 
eignet sich nach wie vor für Steuerungsaufgaben. 

Natürlich gibt es auch schon Fortran- und Cobol-Compiler für 
den Mega ST. Die erste ist eine schon sehr alte Programmier¬ 
sprache, die vor allem im naturwissenschaftlichen Bereich ihre 
Bedeutung hat. Cobol hingegen ist für kaufmännische Aufgaben 
mit großen Datenmengen gedacht. Schließlich gibt es noch 
"Exoten" wie beispielsweise PEARL, das gar ein eigenes 
Betriebssystem erfordert. 


2.4.3 Alternative Betriebssysteme 

Keine Angst - mit Politik kommen wir jetzt nicht. In der Tat 
gab es einige Leute, die mit dem Betriebssystem des Atari ST, 
dem TOS, nicht zufrieden waren. So entstanden einige wenige 
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neue Betriebssysteme. Als bekannteste Vertreter sind das 
RTOS/UH, OS-9 und EUMEL. Während OS-9 (ein Produkt von 
Microware) ein reduziertes Pendant zum bekannten UNIX- 
Betriebssystem ist, wurde RTOS von der Universität Hannover, 
EUMEL in der der Uni Bielefeld entwickelt. Außer für RTOS, 
dem einige Public-Domain-Programme zur Verfügung stehen, 
stehen die anderen Systeme relativ "nackt" da. In der Bundes¬ 
republik gibt es für OS-9 lediglich einen BASIC-Compiler, 
etwas mehr ist in Großbritannien zu haben. Für eigene Ent¬ 
wicklungen sind jedoch alle hervorragend geeignet - alle unter¬ 
stützen die Multitasking-Fähigkeiten des Mega ST in höherem 
Maße als das Originalbetriebssystem. Es lassen sich daher relativ 
leicht auch Mehrbenutzeranwendungen einrichten. Der 
Anwender von RTOS kann zudem in der hochentwickelten 
Sprache PEARL arbeiten, während es der EUMEL-Benutzer mit 
der ebenfalls neuen Programmiersprache Elan zu tun bekommt. 

Zum Thema alternative Betriebssysteme kann noch gesagt wer¬ 
den, daß alle auch mit dem neuen TOS zurechtkommen, größere 
Probleme sind nicht bekannt. 
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3. Der Mega ST und die Außenwelt 


Ein Personal Computer ist nicht viel wert, eigentlich ganz und 
gar nichts - verfügt er doch noch nicht über die technischen 
Voraussetzungen, Daten einzugeben und Ergebnisse auf irgend¬ 
eine Weise dem Benutzer mitzuteilen. Dazu braucht es die soge¬ 
nannte Peripherie. Hierunter versteht man alles, was nicht un¬ 
mittelbar zum eigentlichen Rechner gehört: Bildschirm, externe 
Floppylaufwerke und Festplatten, Tastatur, Maus, Modem oder 
Akustikkoppler und nicht zuletzt ein Drucker, mit dem man be¬ 
liebige Daten oder Grafiken zu Papier bringen kann. Hinzu 
kommen noch exotischere Gerätschaften wie Scanner, MIDI- 
Instrumente oder Lichtgriffel (Lightpens). Von diesen Dingen 
wollen wir erst garnicht reden. Reden wollen wir allerdings dar¬ 
über, was man mit welcher Schnittstelle alles anfangen kann. 


3.1 Die Schnittstellen - und wie man sie benutzt 

Damit ein Peripheriegerät angesteuert werden kann, benötigt ein 
Computer sogenannte Schnittstellen. Der Mega ST hat, wie schon 
seine Vorgänger, eine ganze Menge davon. Die unten abgebildete 
Grafik zeigt die Schnittstellen an der Rückseite des Rechners 
mit kurzen Hinweisen zu den wichtigsten Einsatzmöglichkeiten. 
Im folgenden lernen Sie dann einige wichtige Grundlagen zu den 
verschiedenen Schnittstellen kennen - kurz und bündig, ohne 
daß wir vorerst näher auf elektrische und programmier¬ 
technische Eigenschaften dieser Schnittstellen eingehen wollen. 
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Systenbus (unter Abdeckung) 



Bild 42: Die Schnittstellen des Mega ST 


Wie man sieht, ist der Mega ST mit vielen Möglichkeiten ausge¬ 
stattet, an die Öffentlichkeit zu treten. Auffällig ist besonders, 
daß kaum eine Schnittstelle nicht zu einem Netzwerk-Anschluß 
verwendbar ist. In der Tat gibt es bereits zu jeder möglichen 
Lösung ein Produkt, auch wenn die Entwicklung hier noch im 
Anfang begriffen ist. Netzwerke wie die von BNT oder PAM 
Software zeigen, wie leistungsfähig ein Netz aus mehreren Mega 
ST bzw. Atari ST sein kann. Meist dient ein Mega ST als Server, 
während es für die einzelnen Arbeitsstationen auch ein 
"normaler" ST tut. Der Vorteil ist klar: Durch gemeinsame 
Nutzung der auf dem Steuerrechner (Server) des Netzes instal¬ 
lierten Software sowie den abwechselnden Zugriff auf gemein¬ 
same Peripherie, z.B. Drucker und Festplatten, kann eine Menge 
Geld gespart werden. Natürlich lohnt ein Netzwerk nur für den 
kommerziellen Anwender. 
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Joystick-, Maus- und Tastatur-Schnittstellen 

Auf der abgebildeten Grafik sind die beiden Schnittstellen- 
Buchsen für Maus und Tastatur nicht zu erkennen. Sie sind auch 
relativ unwichtig für eine Erweiterung des Mega ST. Die Lage 
geht zudem aus den Ausführungen im ersten Kapitel hervor. Die 
Tastaturschnittstelle dient ausschließlich zum Anschluß der 
Tastatur. Da diese einen eigenen Prozessor hat, praktisch einen 
"Ein-Chip-Computer" in Gestalt des Motorola 6301, ist es 
nahezu unmöglich, mit vertretbarem Aufwand eine fremde 
Tastatur an den Mega ST anzuschließen. Mit dem "intelligenten" 
Original-Keyboard des Mega ST ist man ausreichend ausge¬ 
rüstet. 

Mit der Maus sieht das ähnlich aus. In seltenen Fällen, vor allem 
bei Spielen, kann statt der Maus ein zweiter Joystick ange¬ 
schlossen werden. Ein Arbeiten mit dem Mauszeiger und GEM 
ist mit den Bewegungen eines Joysticks dann allerdings nicht 
möglich. Die zweite Buchse direkt neben dem Mausanschluß 
dient zum Anschluß des ersten Joysticks. 


Der ROM-Modul-Port 

An der linken Seite des Rechnergehäuses befindet sich ein 
Modulschacht zur Aufnahme von ROM-Modulen. Ein solches 
Modul ist eigentlich nichts anderes als eine Platine mit einem 
oder mehreren ROM-Bausteinen bzw. EPROMs. Diese Bausteine 
können Programme mit insgesamt maximal 128 Kilobyte Um¬ 
fang enthalten. Den Inhalt eines angeschlossenen ROM-Moduls 
bekommen Sie zu sehen, wenn Sie ein Disketten-Icon mit einem 
kleinen "d" anmelden. Durch das übliche Anklicken mit dem 
Mauszeiger können die Programme im ROM-Modul ebenso ge¬ 
startet werden wie von einer Floppy oder Festplatte. Auf einem 
Modul gespeicherte Programme sind natürlich sehr schnell ge¬ 
startet - sie liegen ja in einem Adreßraum des Mega ST, der 
direkt zum übrigen ROM zu rechnen ist. 

Leider hat man nicht viel von diesem Adreßraum, wenn man 
etwas hineinschreiben will. Man könnte ja beispielsweise daran 
denken, Meßwerte über den Port einzulesen oder eine Platine 
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mit RAM-Bausteinen einzustecken und als RAM-Floppy zu be¬ 
nutzen. In beiden Fällen muß der Datenverkehr auch in Rich¬ 
tung Ausgang möglich sein - doch da haben wir Pech! Sieht man 
einmal von einigen technischen Kunststückchen in der Fach¬ 
presse ab, läßt sich der Inhalt der ROMs auf einem Modul 
lediglich lesen - Einbahnstraße also! Übrigens benutzen manche 
Programmanbieter die Informationen auf einem ROM-Modul 
(auch Cartridge genannt) dazu, ihre Software zu schützen. Wird 
ein solches Programm ohne das entsprechende Modul gestartet, 
ist kein Arbeiten damit möglich. Man nennt ein solches Modul 
allgemein auch "Dongle". 


Der Anschluß für die zweite Floppy 

Der Mega ST verfügt über mehrere kreisrunde Buchsen für 
DIN-Stecker. Die größte dieser Buchsen ist mit Floppy bezeich¬ 
net und dient zum Anschluß eines zweiten Diskettenlaufwerkes. 
Dieses kann entweder in 3i- oder 5{-Zoll-Technik ausgeführt 
sein. Der Mega ST kann mit beiden Formaten umgehen. 
Schwieriger ist es schon, den passenden Stecker für die etwas 
exotische Buchse zu finden. Im schlimmsten Falle, wenn auch 
der Zubehörhandel nicht weiterhelfen kann, kann man sich den 
benötigten 14-poligen Stecker auch selbst mit Lötnägeln zusam¬ 
menbasteln. Meist sind Fremdfloppies, die zum Einsatz mit dem 
Mega ST gedacht sind, bereits mit dem richtigen Stecker ausge¬ 
rüstet. Schwierig wird es nur, wenn man eine völlig "nackte" 
Floppy anschließen will. 


Die MIDI-Schnittstelle 

Musiker horchen hier auf, denn der Mega ST besitzt eine MIDI- 
Schnittstelle! Kein anderer Rechner kann damit dienen. In der 
Regel muß ein teures Interface angeschafft werden, soll ein her¬ 
kömmliches System zur Steuerung eines MIDI-Netzwerkes 
dienen. MIDI heißt Musical Instrument Digital Interface und 
dient zur Verbindung mehrerer elektronischer Musikinstrumente. 
Von einem Keyboard aus kann dann die gesamte Anlage, be¬ 
stehend z.B. aus mehreren Synthesizern, gespielt werden. 
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Der Computer dient dazu, auf Disk oder Festplatte befindliche 
fertige "Sounds" bzw. "Samples" an die Synthesizer zu liefern 
bzw. solche Klänge zu empfangen und zu speichern (zu 
sampeln). Ein solches Sample (kleine Elemente eines kompletten 
Stückes, manchmal nur von einer Sekunde Dauer) kann vom 
Musiker in seine eigenen Stücke eingebaut werden, z.B. ein 
Horn oder ein bestimmtes Schlagzeugmuster (Beispiel: "Snare"). 
Da wird natürlich auch viel geklaut - kaum ein Hit bleibt ver¬ 
schont. Man sollte wissen, daß man praktisch jeden Ton, z.B. 
Stimmen, digitalisieren und auf Diskette speichern kann. Wichtig 
ist vielleicht noch, daß die Qualität, also die "Naturnähe" eines 
Samples stark davon abhängt, ob es sich um ein 8- oder 16-Bit- 
Sample handelt - mit 16 Bit lassen sich ganz einfach mehr In¬ 
formationen darstellen. 

Wenige Worte noch zur Technik: Beim Mega ST sind die MIDI- 
Schnittstellen "In" und "Out" realisiert. Die zusätzliche Funktion 
"Midi Through", bei professionellen MIDI-Geräten normiert und 
vorhanden, ist beim Mega ST über MIDI OUT vorgenommen 
worden, auch wenn das nicht ganz normgerecht ist. 

Über die MIDI-Schnittstellen läßt sich natürlich auch ein Netz¬ 
werk betreiben, die Datenübertragung erfolgt nämlich mit be¬ 
achtlichen 31250 Bit/s, ein ausreichender Wert für ein Netzwerk. 
Solche Netzwerke sind bereits auf dem Markt und kosten ca. 
DM 1500,-/Arbeitsstation. 


Der Parallel- oder Centronics-Port 

Diese Schnittstelle dient hauptsächlich zum Anschluß eines 
Druckers mit parallelem Interface (Schnittstelle). Der Datenver- 
kehr erfolgt mit 8 Bit, die parallel auf je einer Leitung der 
Schnittstelle übertragen werden. Insgesamt gibt es also 8 Daten¬ 
leitungen an dieser Schnittstelle. Das ist der deutlichste Unter¬ 
schied zu einer seriellen Schnittstelle, bei der die übertragenen 
Datenbits hintereinander über eine einzige Leitung wandern. 

Beim Mega ST ist die parallele Schnittstelle mit jedem her¬ 
kömmlichen Drucker verwendbar. Zum Anschließen benötigen 
Sie ein Kabel, wie es auch für den IBM PC und seine Kompati- 
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blenfamilie verwendet wird. Eines zu kaufen ist allerdings her¬ 
ausgeworfenes Geld. Besorgen Sie sich statt dessen lieber zwei 
Meter Flachbandkabel (25-adrig), einen sogenannten Quetsch¬ 
stecker D25-Sub (der kommt an den Computer) sowie einen 
weiteren Quetschstecker des Typs Cinch mit 36 Polen. Die 
beiden Stecker werden dann lediglich auf das Kabel (mit einem 
Schraubstock) an den Enden aufgepreßt. Nun können Sie jeden 
Drucker mit Parallel-Interface benutzen. 

Es soll noch erwähnt werden, daß es Netzwerke gibt, die über 
den Parallel-Port realisiert wurden. Ein Beispiel ist das bereits 
erwähnte BNT-Netzwerk. Bei diesem ist der Port durchge¬ 
schleift, damit weitere Rechner bzw. ein Drucker angeschlossen 
werden können. Schließlich kann man über die parallele 
Schnittstelle einen Scanner betreiben, um bildliche Darstellungen 
in den Computer einzulesen. 


Der Video-Anschluß 

Die Video-Buchse des Mega ST stellt das Signal für einen RGB- 
Monitor bereit. Da der Mega ST zwischen einem Monochrom- 
sowie einem Farbmonitor unterscheiden soll, benötigt er mehr 
als nur die unbedingt notwendigen Leitungen. Die Video-Buchse 
stellt deshalb insgesamt 13 Pins zur Verfügung. 

Neben den Original-Monitoren SM 124 und SCI224 ließen sich 
eigentlich ohne Probleme auch die RGB-Monitore fremder Her¬ 
steller verwenden. Ja, es wäre sogar möglich, durch Verwendung 
einiger Widerstände und Drähtchen einen fremden Monochrom- 
Monitor anzuschließen, indem die Signale gemischt werden und 
der Monitor Farbdarstellungen einfach in Graustufen umsetzte. 
Leider verwendet Atari einen völlig unüblichen Stecker, der fast 
nicht zu bekommen ist. Hier hilft nur Eigeninitiative - man 
kann einen solchen Stecker durch Einlöten von Lötnägeln in ein 
kleines Stück einer Lochrasterplatine auch selbst herstellen. Mit 
Ausnahme eines Pins entsprechen die Abstände der Buchsenpins 
denen der Löcher auf der Platine. 

Wichtig: Bevor Sie mit Hardwarebasteleien am Monitor be¬ 

ginnen, ohne zu wissen, was Sie eigentlich tun müs- 
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sen - fragen Sie lieber einen Bekannten mit Fach¬ 
kenntnis. Der Monitor oder der Computer könnten 
leicht Schaden nehmen. 


Direkter Weg - der DMA-Port 

Der Mega ST verfügt über einen sogenannten DMA-Controller. 
DMA heißt Direct Memory Access, und das bedeutet, daß ohne 
"Belästigung" des 68000-Prozessors auf Peripherie und Speicher 
zugegriffen werden kann. Außerdem ist der Datenaustausch per 
DMA recht schnell - rund 1 Megabit/s, also eine Million Bits, 
wandern bei Bedarf über die Schnittstelle. Aus diesem Grunde 
wird der DMA-Port zur Ansteuerung der Fesplatte(n) bzw. des 
Atari-Laserdruckers verwendet. Maximal können bis zu acht 
solcher über DMA ansprechbare Geräte gleichzeitig angeschlos¬ 
sen sein, wobei der DMA-Port durchgeschleift wird. Auch der 
DMA-Port schickt die Daten mit 8 Bit parallel hinaus, wegen 
der oben beschriebenen Eigenschaften aber mit weit höherer 
Geschwindigkeit. 

Der DMA-Port bietet aber auch eine hervorragende Gelegenheit, 
ein Netzwerk einzurichten. Durch die hohe Übertragungsrate ist 
er den anderen Schnittstellen überlegen. Weitere Möglichkeiten 
für den DMA-Einsatz sind in Erweiterungskarten zu sehen. Wie 
am Systembus selbst, der ja hinter der auf der Rückseite des 
Mega ST sichtbaren Blende sitzt, kann auch an den DMA-Port 
ein Arithmetik-Prozessor oder eine Meßeinrichtung angeschlos¬ 
sen werden. Solche Lösungen bleiben allerdings fortgeschrittenen 
Benutzern Vorbehalten, die nicht nur gut mit dem Lötkolben 
umgehen können - der gesamte Bereich ist noch Neuland. Auch 
der von Atari bereits angekündigte Transputer, dem der Mega 
ST nur noch als Terminal dienen wird, dürfte über den DMA- 
Port verbunden werden. 


Die serielle Schnittstelle (RS232) 

Hier haben wir es mit einer der wichtigsten Schnittstellen des 
Mega ST zu tun. Im Gegensatz zur parallelen Datenübertragung 
beim Centronics-Port werden hier die Bytes Bit für Bit hinter- 
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einander übertragen. Dazu dienen bei der seriellen Schnittstelle 
zwei Leitungen: auf der ersten werden Daten gesendet, auf der 
zweiten empfangen. Alle anderen Pins der RS232-Schnittstelle, 
wie sie nach einer US-amerikanischen Norm auch genannt wird, 
dienen der Sicherung bzw. korrekten Aufnahme einer Über¬ 
tragung. Und selbstverständlich soll die Datenübertragung auch 
einwandfrei zu ihrem Ende kommen. 

Die serielle Schnittstelle hat ihren wichtigsten Anwendungs¬ 
bereich in der Datenfernübertragung - der Verbindung von 
Computern über mehr oder weniger große Entfernungen. Dabei 
übernimmt die RS232 die Wandlung des vom Computer kom¬ 
menden parallelen in einen seriellen Datenstrom (parallel- 
/seriell-Wandlung). Außerdem erfolgt durch die Hardware der 
seriellen Schnittstelle eine Pegelwandlung der computerinternen 
+5-Volt-Pegel auf eine Wechselspannung von etwa ±12 Volt, 
diese wird von der seriellen Schnittstelle verlangt. Durch die 
wenigen benötigten Leitungen ist eine Übertragung von Daten 
per Telefonnetz möglich. An die serielle Schnittstelle wird zu 
diesem Zweck eine Einrichtung namens Modem bzw. Akustik¬ 
koppler angeschlossen. Worum es sich dabei genau handelt, ist 
im Abschnitt über die Datenfernübertragung mit dem Mega ST 
beschrieben, den Sie weiter unten finden. Die folgende Abbil¬ 
dung zeigt Ihnen, wie Sie die RS232 mit Hilfe der Dialogbox 
RS232 Konfiguration einstellen können. Sollten Sie vornehmlich 
mit einem Modem an der Schnittstelle arbeiten, so wählen Sie 
am besten die Einstellung: 8 Bit, 2 Stopbits sowie XOn/Xoff an. 
Für die Parität ist "Keine" bzw. "No" die richtige Einstellung. 
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Bild 43: Die Dialogbox zur Einstellung der RS232-Schnittstelle 


Man kann die RS232, die bei uns auch als V.24 bezeichnet wird 
(stimmt nicht ganz, eigentlich sind die Forderungen der V.24- 
Empfehlung nur eine Untermenge der RS232-Normanforderun- 
gen), auch als Druckeranschluß benutzen. Obwohl sie langsamer 
ist als etwa die Druckersteuerung über den Parallel-Port, werden 
die meisten Druckermodelle wahlweise auch mit einem seriellen 
Interface angeboten. Manche verfügen gar über beide Schnitt¬ 
stellen. Als Anschlußkabel kann man meistens die handelsüb¬ 
lichen RS232-Anschlußkabel verwenden. Allerdings sind die 
nicht billig! Selbst basteln ist etwas unsicher, denn viele Drucker 
benutzen unterschiedliche Pin-Kombinationen und Signale zur 
einwandfreien Arbeit - eine relativ verbreitete Lösung für das 
Kabelproblem finden Sie im dritten Kapitel, in dem es um 
Drucker geht. 
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3.2 Wie Datenfernübertragung funktioniert 

Der Mega ST besitzt mit der seriellen Schnittstelle gewisser¬ 
maßen ein Tor zur weiten Welt. Dies deutete sich im vorange¬ 
gangenen Abschnitt über die serielle Schnittstelle schon an. 
Vielleicht haben Sie schon von Online-Datenbanken oder Mail¬ 
box-Systemen gehört - oder arbeiten schon längst damit. Es 
handelt sich dabei um Computer, die Sie mit Hilfe des eigenen 
Rechners über das Telefonnetz oder besondere Datennetzwerke 
der Bundespost anrufen bzw. erreichen können. Sie können 
Nachrichten mit anderen Teilnehmern bzw. Benutzern dieser 
entfernten Rechner, auch weltweit, austauschen, Programme per 
Telefon beziehen oder in Datenbanken jeder Fachrichtung nach 
Informationen suchen. Der Mega ST eignet sich besonders in 
Verbindung mit einer Festplatte zur Datenfernübertragung, da 
empfangene Texte zuerst im gewaltigen RAM des Rechners ab¬ 
gelegt werden können, ohne daß ständig auf Diskette gespeichert 
werden muß. Und schließlich kann nach Ende der Verbindung 
das komplette empfangene File auf die Festplatte gesichert wer¬ 
den. Denkbar ist auch eine eigene Mailbox, die man anderen 
Anwendern zur Verfügung stellen kann. Man könnte die kom¬ 
plette Box in einer RAM-Disk unterbringen. Allerdings ist dann 
bei einem Netzausfall alles futsch - schnell wäre eine solche Box 
aber. 

Übrigens: Die Datenübertragung klappt nicht nur in der Fern¬ 
version - besonders einfach lassen sich Daten 
zwischen Rechnern hin- und herschicken, die in 
geringem Abstand voneinander stehen und daher 
ohne Telefon miteinander kommunizieren können. 
Auf diese Weise können Sie beispielsweise Daten 
zwischen einem MS-DOS-Rechner oder sogar einem 
Amiga und dem Mega ST übertragen. In der Regel 
können zwar keine auf dem Mega ST lauffähigen 
Programme übertragen werden (mit Ausnahmen), 
aber immerhin Text- bzw. Datensätze, die als 
ASCII-Datei vorliegen. 

Zuerst einmal wollen wir die Frage klären, wie das Ganze funk¬ 
tioniert, welche zusätzlichen Geräte benötigt werden und wie es 
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mit der Software aussieht - denn die brauchen Sie zur Kommu¬ 
nikation über Telefon und öffentliche oder private Netze natür¬ 
lich auch. 

Datenübertragung über die serielle Schnittstelle des Mega ST 
funktioniert grob vereinfacht so: Es erfolgt eine parallel-/seriell- 
Wandlung der zu übertragenden Daten. Außerdem wird die be¬ 
reits erwähnte Pegelwandlung vorgenommen. Die Daten wandern 
nun als Spannungsimpulse über ein Kabel zwischen serieller 
Schnittstelle und dem sogenannten Modem, das die gesendeten 
Daten in elektrische Impulse verwandelt, die wiederum über das 
Telefon zur Gegenstation übertragen werden. Umgekehrt besorgt 
das Modem (Modulator/Demodulator) auch die Rückwandlung 
der elektrischen Impulse in digitale Informationen. 



Telefonnetz 


Moden 

oder 

Koppler 


Modu X a t i on/De«odu 1 a t i on 


^ Telefon ^ 


Datex-P 


BTX 


Bild 44: Datenfernübertragung mit dem Mega ST 


Was man so braucht 

Zur Datenkommunikation benötigen wir außer der seriellen 
Schnittstelle noch: 


1. Kommunikationsprogramm 
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2. Modem oder Akustikkoppler 

3. Verbindungskabel zwischen Modem und Mega ST 

4. Telefonanschluß 

Am leichtesten haben wir es in der Regel mit dem Telefonan¬ 
schluß, der dürfte in den meisten Häusern vorhanden sein. Ein 
Modem oder einen Akustikkoppler haben Sie vielleicht schon, 
dann brauchen wir Ihnen dazu eigentlich nicht viel zu erzählen. 
Wenn Sie aber noch nicht wissen, was das ist - gleich erfahren 
Sie mehr darüber. 


3.3 Kommunikations-Software und -Hardware 

Diese Software dient dazu, die serielle Schnittstelle, das Modem 
bzw. den Akustikkoppler zu bedienen sowie die eigentliche 
Übertragung und Sicherung der Daten zu koordinieren und 
durchzuführen. Man spricht auch von einem Terminalprogramm, 
weil der Mega ST mit Hilfe eines solchen Programmes die Rolle 
eines Terminals übernimmt. Terminals sind Arbeitsstationen, mit 
denen man beispielsweise einen Großrechner bedient. Mit 
solchen Geräten kann man aber in der Regel keine Daten ab¬ 
speichern, ganz im Gegensatz zum Mega ST. Viele Terminal¬ 
programme für den Mega ST verfügen übrigens über sogenannte 
Terminal-Emulationen, mit denen bestimmte Terminaltypen und 
deren charakteristische Fähigkeiten nachgebildet werden können. 

Solche Emulationen sind beispielsweise VT52 und VT100, beides 
sind Terminaltypen des Herstellers Digital Equipment. Mit einer 
VT52- oder VTIOO-Emulation kann man die Kommunikation im 
Page-Mode durchführen: Eine vollständige Kontrolle des ge¬ 
samten Bildschirmbereiches ist möglich. Man kann also z.B. ein 
Formular ausfüllen, das während einer bestehenden Verbindung 
(Online) vom angerufenen Computer auf dem Bildschirm Ihres 
Mega ST abgebildet wird. Dabei können Sie auf dem ganzen 
Bildschirm arbeiten, ohne daß dieser scrollt oder sich sichtbar 
neu aufbaut. 
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Es würde hier zu weit führen, näher auf diesen Bereich ein¬ 
zugehen. Ein Hinweis auf "Das große DFÜ-Buch zum Atari ST" 
von DATA BECKER sei gestattet. Dessen Inhalt gilt fast voll¬ 
ständig auch für die Kommunikation mit dem Mega ST. Dort 
finden Sie detaillierte Erläuterungen zu allen wichtigen Fragen 
der Datenfernübertragung und deren Prinzipien. 

Ein Terminalprogramm bzw. eine VT52-Emulation ist übrigens 
auf der Systemdiskette Ihres Mega ST. Dieses Programm lag be¬ 
reits den allerersten ST-Modellen bei. Es handelt sich um eines 
der Desk-Accessories. Da es sich um eine reine Emulation 
handelt, können Sie damit zwar jede Mailbox oder Datenbank 
anrufen und damit arbeiten. Leider können aber keine 
empfangenen Daten abgespeichert oder gespeicherte Daten ge¬ 
sendet werden. So ist der VT52-Emulator zwar recht nützlich, 
aber kein bißchen besser als sein Vorbild - ein "dummes" Ter¬ 
minal eben. Dafür versteht der Emulator aber eine ganze Reihe 
von Control-Codes. Diese werden während einer Verbindung 
eingegeben, indem jeweils die Taste Control in Verbindung mit 
einem bestimmten Buchstaben betätigt wird. Eine Liste dieser 
Codes finden Sie im Anhang des Buches. 

Zur sinnvollen Kommunikation benötigen Sie also leistungs¬ 
fähige Software, die Sie entweder kaufen oder als Public- 
Domain-Software umsonst beziehen können. Einige Beispiele: 
Umsonst gibt es Uniterm, ein Public-Domain-Programm mit al¬ 
len Eigenschaften eines professionellen Produktes. Unter 
anderem ist es möglich, eine ganze Reihe von sogenannten 
Error-free-protocols zu nutzen. Diese speziellen Übertragungs¬ 
methoden erlauben die Übertragung von Programmen über die 
Telefon- oder eine andere Datenleitung. Dabei wird anhand 
einer Prüfsumme ermittelt, ob Fehler auftreten - die fehler¬ 
haften Daten werden dann so lange wiederholt, bis die Über¬ 
tragung geklappt hat. Natürlich kann man auch Texte mit einem 
solchen Protokoll, z.B. XModem oder KERMIT, übertragen. 
XModem und KERMIT sind die bekanntesten dieser Protokolle. 
Die meisten Mailboxen stellen diese bereit, denn das ist wichtig: 
Beide Endgeräte, als Anrufer und Angerufener, müssen das 
gleiche Protokoll verwenden. 
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Weitere interessante Lösungen sind DeLuxe Term (HIB), mit 
dem man sogar Btx betreiben kann, K-Comm (Kuma) und das 
sehr leistungsfähige PAM’s-Term, mit dem man sogar eine 
Emulation des bekannten 4014-Grafikterminals von Tektronix 
fahren kann. Solche Lösungen machen den Mega ST als intelli¬ 
gentes Terminal auch für Industrie und Hochschule interessant. 


Desk File Printer 


Options Help 


0 0000 


Description: Internal Default Teminalj_ 

Teminal: Heletupel f UT52 1 fc'ill'M ITser-def ined I 
Teminal Ident, IS/Z_ I Fst?lilld 

Baud Rate: ^6Ü ÜÜ HH HÜ 11289/751 [68Bl Bill ITifll I75/12B81 


Bits: ETghtl Stop bits: fü!HIT hoI 

Handshake: KH1T1 Bon/Xoffl ICTS/RTSI 
Echo: I7TB1 llocall CR gives LF: 

Debug Kode: i On I Imi Send LFs: 
Strip Top: rörnim Urap at EOL: 


Parity: I Hone 11 Odd] UHü 
Hidth: — HE IUI 
flE [ CRHCEL I 

j^QI 

□HE 


I Help I 




OK 


Bild 45: Terminal konfigurieren mit K-Comm 


Modem und Akustikkoppler 

Modem und Akustikkoppler benötigen wir zur Verbindung mit 
dem Telefonnetz. Während ein Modem mit dem Telefonnetz 
elektrisch verbunden ist, sieht die Sache beim Koppler etwas 
anders aus: Er verwandelt die Datenimpulse in akustische 
Signale, die über Gummimuffen, in die der Telefonhörer gelegt 
wird, an die Telefonleitung gegeben werden. Abgesehen davon 
funktioniert der Koppler wie ein Modem. 
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Alle Moderne und Koppler müssen von der Post zugelassen sein, 
sonst könnte es Strafen geben. Vor allem bei Modernen sieht die 
Sache schlecht aus. Es gibt zwar sehr gute Geräte, Sie können 
damit automatisch wählen und abheben, mit Baudraten von 2400 
Baud fahren usw. Nur sind bisher noch keine Moderne von 
privaten Anbietern zugelassen. Lediglich sogenannte Modem¬ 
boxen, in die ein preisgünstiges Mietmodem der Post eingesteckt 
wird, erlauben ähnliche Leistungen auf legalem Wege. Akustik¬ 
koppler hingegen gibt es in großer Zahl bereits zugelassen. Bei 
Einsatz eines solchen Gerätes benötigen Sie keine Postzulassung 
des Computers selbst. 

Auch ein Mietmodem der Post darf aber angeschlossen werden, 
denn der Mega ST verfügt über die vollständige Zulassung als 
Datenendgerät. 


Ein Kabel für den RS232-Port 

Sie können ein Kabel zur Verbindung von RS232 und Modem 
selbst herstellen. Besorgen Sie sich dazu zwei DB25-Quetschver- 
binder sowie ein 25-poliges Flachbandkabel. Achten Sie darauf, 
daß die beiden Enden 1:1 verbunden sind - fertig! 

Etwas anders sieht die Sache aus, wenn Sie direkt Daten 
beispielsweise zwischen zwei ST oder ST und PC etc. übertragen 
wollen. Das Kabel sieht dann anders aus, denn wir haben es ja 
nun mit zwei Datenendgeräten zu tun, ähnlich wie es sich beim 
Anschluß eines Druckers verhält. Fertigen Sie deshalb ein Kabel 
mit den Anschlüssen des folgenden Bildes an. Mindestens Pin 2 
und 3 der jeweiligen RS232-Schnittstellen der beteiligten Com¬ 
puter müssen über Kreuz miteinander verbunden werden, 
außerdem sind die Pins 7 1:1 miteinander zu verbinden. 
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Pin Nr, 


Pin Nr. 


RSZ32 
Rechner 2 
bzw, Mega ST 



RS232 
Rechner 1 


Bild 46: Ein Nullmodem für den Mega ST - so wird’s gemacht 


Man nennt ein solches Kabel auch Nullmodem. Mit bis zu 9600 
Baud können jetzt Daten zwischen zwei Rechnern übertragen 
werden. Mit dem VT52-Emulator können Sie das leicht auspro¬ 
bieren, der andere Rechner darf auch ein "Nicht-ST" sein. Das 
ist ja gerade der Witz: Unterschiedliche Systeme kommen durch 
die seriellen Schnittstellen einander "näher". 

Natürlich können wir hier nicht detailliert auf die Datenfern¬ 
übertragung mit dem Mega ST eingehen, dazu gibt es spezielle 
Literatur. Aber vielleicht konnten wir Ihnen zumindest einen 
ersten Eindruck davon vermitteln, wie interessant und 
leistungsfähig diese Nutzung des Mega ST sein kann. 
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4. Die Hardware 


In diesem Kapitel geht es um die Hardware - also um alles, was 
keine Software ist: Den Monitor, die Floppy, die Festplatte, al¬ 
lerlei Drucker inklusive des sensationellen Lowcost-Laser- 
druckers von Atari. Und nicht zuletzt auch um den Mega ST 
selbst. 


4.1 Die Peripherie 

Wir wollen uns auf den folgenden Seiten auf die Peripherie des 
Mega ST konzentrieren und auf Fragen dazu näher eingehen, 
wie z.B.: Welche Drucker kann ich anschließen? Wie funktioniert 
der Laserdrucker? Was unterscheidet die Floppy von der Fest¬ 
platte? Welche Auflösung hat eigentlich der verwendete Monitor 
bzw. Bildschirm? 


4.1.1 Augen auf - Monitore am Mega ST 

Normalerweise werden Sie den Mega ST im "Paket" erwerben - 
zusammen mit einem Monitor, einem Datensichtgerät also. Wie 
schon früher erwähnt, können prinzipiell auch Monitore anderer 
Hersteller als Atari verwendet werden. Durch entsprechende 
Veränderungen am Anschlußkabel lassen sich sogar Farbpro- 
gramme mit einem monochromen, also schwarzweißen oder 
schwarzgrünen Monitor mit Video-Eingang ausführen. Mit dem 
originalen S/W-Monitor ist das allerdings nicht möglich. Darauf 
wollen wir hier aber nicht näher eingehen. Erwähnenswert ist 
allerdings, daß sich ein Farbfernseher neuerer Produktion, der 
mit einer sogenannten Scart-Buchse für den Videorecorder aus¬ 
gerüstet ist, nach geringen Veränderungen ganz ausgezeichnet als 
Farbmonitor eignet. Einige preisgünstige Farbmonitore, z.B. der 
CM 8852 von Philips, werden gleich mit einem passenden 
Stecker für den Video-Port geliefert. Der genannte Monitor 
verfügt sogar über eine "Grünschaltung", die dem Bildschirm 
einen PC-ähnlichen Anblick verleiht - in monochrom. 
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Sie wundern sich, daß man Veränderungen am Kabel eines 
monochromen Monitors vornehmen muß, wenn Software für 
Farbdarstellungen ausgeführt werden soll? Tja, so ist das nunmal 
beim Mega ST und seinen ST-Kollegen - der Computer erkennt 
über den Anschluß, welche Art von Monitor angeschlossen 
wurde. Und dann kann es geschehen, daß das eine oder andere 
Programm nicht läuft: Es ist für den Färb- bzw. Monochrom- 
Monitor geschrieben und nur damit lauffähig. Es ist deshalb 
wichtig, für welchen Monitortyp Sie sich entscheiden, wenn Sie 
Ihren Mega ST kaufen. Denn damit legen Sie sich erst einmal 
fest: Monochrom- und Farbmonitor bieten nämlich im Zusam¬ 
menhang mit dem Mega ST unterschiedliche Auflösungsstufen 
für Grafik und Farbe. Grundsätzlich kann man sagen, daß die 
grafische Auflösung geringer wird, je mehr Farben gleichzeitig 
dargestellt werden können. Die Umschaltung zwischen den drei 
möglichen Bildschirm-Modi erfolgt mit Hilfe der Option "Vor¬ 
einstellungen" im Rollmenü EXTRAS. 

Dem Mega-ST-Anwender stehen insgesamt 512 Farben zur 
Verfügung, aus denen er maximal 16 auswählen und gleichzeitig 
auf dem Bildschirm darstellen kann. Die möglichen Bildschirm- 
Modi des Mega ST sind: 


Hohe Auflösung (nur Monochrom-Monitor) 

Dies ist die höchste Auflösung, die der Mega ST uns anbieten 
kann. In dieser Stufe kann der Bildschirm 640 x 400 Bildpunkte 
darstellen. Das bedeutet aber, daß wir lediglich die beiden 
Grundfarben Schwarz und Weiß zu sehen bekommen. Bei einem 
angeschlossenen Grün-Monitor sehen wir natürlich die Grund¬ 
farben Grün und Schwarz. Für reine Textverarbeitung und 
Anwendungen wie CAD und Grafik ist die höchste Auflösungs¬ 
stufe ideal. 

Die höchste Grafikauflösung ist aber nur mit einem Mono¬ 
chrom-Monitor anwendbar - und nur diese. Daher erscheinen 
die Buttons "Mittel" und "Niedrig" in der Dialogbox "Voreinstel¬ 
lung" auch in heller Schrift und sind nicht anwählbar. 
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Mittlere Auflösung (nur Farbmonitor) 

Die mittlere Auflösungsstufe bietet nur noch 640 x 200 Punkte. 
Jeder dieser Punkte ist nun allerdings doppelt so hoch wie breit. 
Daher erscheint das Desktop, jetzt in Grün, Weiß und Schwarz, 
auch seltsam in der Höhe verzerrt. Dafür können in der 
mittleren Auflösung aber vier Farben gleichzeitig dargestellt 
werden. Die mittlere Auflösung ist nur mit einem Farbmonitor 
darzustellen. Sie eignet sich für Anwendungen, die viel mit Text 
arbeiten, also Textverarbeitungen, Datenbanken, Grafikan¬ 
wendungen, die ohne viel Farbe auskommen, sind hier ebenfalls 
richtig aufgehoben. 


Niedrige Auflösung (nur Farbmonitor) 

Schließlich stellt der Mega ST noch die niedrige Auflösung von 
320 x 200 Punkten zur Verfügung. In dieser Stufe laufen die 
meisten Spiele für den Mega ST, auch viele Grafik- bzw. Ani¬ 
mationsanwendungen erfordern die niedrige Auflösungsstufe. 
Zwar ist diese Darstellungsart wenig für Textverarbeitungen und 
andere Anwendungen zu gebrauchen, die eine gestochen scharfe 
Darstellung erfordern. Aber Spiele und Grafik möchten Farbe 
sehen - und die gibt es jetzt: Insgesamt 16 Farben lassen sich 
darstellen. Die Punkte sind jetzt zwar wieder genauso hoch wie 
sie breit sind, aber der einzelne Punkt ist praktisch viermal so 
groß als in der höchsten Auflösung. Entsprechend grob ist der 
Bildschirmaufbau. 

Wichtig: Nach dem Einstellen des Bildschirm-Modus im 

Rollmenü EXTRAS macht der Mega ST ein Reset. 
Das ist normal und muß so sein. Lief vor dem Um¬ 
schalten ein Programm, so muß dieses neu gestartet 
werden. 


4.1.2 Die Disketten-Laufwerke 

Um unsere Daten abspeichern zu können, benötigen wir ein 
Diskettenlaufwerk. Auch zum Laden von Programmen ist es 
unerläßlich. Es gibt verschiedene Diskettenlaufwerke, die wir an 
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den Mega ST anschließen können. Eines kennen Sie schon: Das 
eingebaute Laufwerk verfügt über eine Kapazität von rund 720 
KByte, also rund 720.000 Zeichen. Das reicht z.B. für zwei 
normale Bücher, wenn Sie als Autor aktiv werden wollen. 

Wozu also ein weiteres Laufwerk anschließen? Dazu gibt es 
verschiedene Gründe, auf die wir gleich näher eingehen werden. 
Zuvor noch ein paar Worte zur Floppy selbst. Eine runde 
Scheibe aus flexiblem Material wird mit einer magnetischen 
Schicht versehen. Um das Ganze herum wird eine Hülle aus 
festem Kunststoff gelegt - fertig ist die Diskette. Bei den her¬ 
kömmlichen Disketten im Format 51 Zoll handelt es sich um 
eine ebenfalls flexible Hülle. Solche Disketten oder Floppys sind 
natürlich anfälliger gegen mechanische Belastung als die 
modernen 34-Zoll-Disketten, die unser Mega ST benutzt. 

Die runde Scheibe aus magnetischem Material (die magnetische 
Schicht besteht aus lauter sogenannten Stabmagneten mit unter¬ 
schiedlicher Orientierung) wird in sogenannte Tracks oder 
Spuren und diese wieder in Sektoren aufgeteilt. Die Spuren sind 
kreisrund angeordnet und jeweils in neun Sektoren aufgeteilt. 
Damit haben wir praktisch eine Art Koordinatensystem vor uns. 
Der Lesekopf des Laufwerks, in das wir unsere Diskette hinein¬ 
geben, bewegt sich nun an jede gewünschte Stelle dieser Fläche 
und erhält Informationen, die sich durch die Einwirkung der 
Stabmagneten auf das Magnetfeld im Inneren des Kopfes und 
davon abhängige Stromschwankungen ergeben. So wird 
beispielsweise ein Programm gelesen. Natürlich kann der Kopf 
die Ausrichtung der Stabmagnete, die ja für die Art der Infor¬ 
mation verantwortlich ist, auch durch entsprechende Strom¬ 
schwankungen des Kopfes ändern - dann werden Daten auf die 
Diskette geschrieben. Diese sehr einfache Beschreibung soll erst 
einmal als Erklärung genügen. 

Eine normale Diskette, die mit dem Mega-ST-Laufwerk forma¬ 
tiert wurde, ist eingeteilt in 80 der oben erwähnten Tracks oder 
Spuren mit je neun Sektoren auf jeder Seite der Diskette. Die 
Numerierung dieser Spuren erfolgt von außen nach innen, und 
zwar von 0 bis 79. Wir haben also 160 Spuren zur Verfügung, 
um Daten zu speichern oder zu lesen. Da jeder Track 4608 Bytes 
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verwendbare Information enthalten kann, kommen wir insgesamt 
auf die oben genannten 720 KByte. Alle Software-Pakete für 
den Mega ST werden auf Disketten im Format 360 KByte 
geliefert. 

Der Grund ist leicht zu erkennen: Fast alle Software-Produkte 
für den Mega ST werden auch für die anderen ST-Modelle an- 
geboten. Viele Benutzer haben deshalb lediglich eine Floppy des 
Typs Atari SF354 zur Verfügung. Und die hat zwar auch 80 
Spuren, nur wird ausschließlich eine Seite der Diskette benutzt. 
Das ergibt aber lediglich eine Kapazität von rund 360 Kilobyte. 
Das ist sicher nicht weiter tragisch, nur lassen sich mit dieser 
Floppy keine Disketten lesen, die mit dem doppelseitigen Lauf¬ 
werk formatiert wurden, denn die SF354 besitzt im Gegensatz 
zur eingebauten Floppystation nur einen Schreib-/Lesekopf. Sie 
kann die zweite Seite der Floppy also nicht lesen. Aus diesem 
Grunde können zwei- und einseitige Disketten nicht mit dem 
einfachen Diskcopy-Befehl (durch Übereinanderbewegen der 
Floppy-Symbole) aufeinander kopiert werden. Sie müssen in 
diesem Fall Datei für Datei einzeln kopieren. Natürlich ist aber 
die zweiseitig aktive (eingebaute) Floppystation in der Lage, 
einseitig beschriebene Disketten zu lesen und sogar einseitig zu 
formatieren. Solche Disketten können dann auch von einem ein¬ 
seitigen Laufwerk gelesen werden. 

Wichtig: Bei vielen Mega-ST-Laufwerken gibt es Probleme 

mit Disketten, die auf einem anderen ST-Rechner 
formatiert und beschrieben wurden. Möglicherweise 
liegt das an der geänderten Fehlerabfrage des TOS 
bei Zugriff auf Disketten. Formatieren Sie in einem 
solchen Falle eine Diskette mit Ihrem Rechner, und 
kopieren Sie die Files dann auf dem anderen System, 
von dem Ihre Quelldaten kommen. Die anderen ST- 
Modelle können offenbar die Disketten eines Mega 
ST ohne Probleme verarbeiten. 

Bleibt die Frage, wozu man ein weiteres Laufwerk anschließen 
soll. Eine zweite Floppy empfiehlt sich, weil der Kopiervorgang 
von Diskette auf Diskette erheblich schneller abläuft - man muß 
nicht zwischen Ziel- und Quelldiskette wechseln (Zieldisk = 
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Targetdisk, Quelldisk = Sourcedisk). Wenn Sie nun aber mit 
zweiseitig formatierten Disketten arbeiten, können Sie keine 
zweiseitigen Kopien mit der SF354 anfertigen. Als Besitzer des 
Mega ST sollten Sie also eine SF314 anschaffen. Die wird mit 
dem beigelegten Kabel einfach an Floppy des Mega ST ange¬ 
schlossen - und schon kann es losgehen. Wenn es Ihnen nichts 
ausmacht, die Diskette einmal zu wechseln, der Mega ST kann 
natürlich den kompletten Inhalt einer Diskette in das RAM ein¬ 
iesen und dann auf eine andere Diskette speichern, können Sie 
natürlich auch auf die zweite Floppystation verzichten. 

In jedem Falle gilt aber: Mehr als zwei Laufwerke können an 
den Mega ST nicht angeschlossen werden. Bei einem eingebauten 
Laufwerk also nur noch ein weiteres. Weitere Laufwerke sind 
durch das Betriebssystem nicht zu verwalten, auch wenn die 
Buchse "Out" an Ihrem zusätzlichen Laufwerk dies anzudeuten 
scheint. 


MS-DOS und die Fremdlaufwerke 

Mittlerweile gibt es eine ganze Reihe von Fremdanbietern, die 
Floppylaufwerke für den Mega ST anbieten. Darunter finden 
sich auch Laufwerke, die mit den bisher marktbestimmenden 
5i-Zoll-Disketten arbeiten. Das kann sehr nützlich sein. Obwohl 
die "kleinen" Disketten mit 37-Zoll-Format inzwischen erheblich 
im Preis gefallen sind, haben 5i-Zoll-Laufwerke ihren Vorteil: 
Sie vermitteln den Zugang zur Welt der MS-DOS-Computer. 
IBM PC und viele Nachbauten, sogenannte Kompatible, bestim¬ 
men bis heute die professionelle Computerwelt im Büro. Das 
geht nun nicht soweit, daß man Programme für MS-DOS- 
Rechner auf dem Mega ST zum Laufen brächte (aber auch das 
ist möglich - siehe unten!). Immerhin kann der Mega ST aber 
sämtliche Textdateien lesen, die von einem MS-DOS-Rechner 
erstellt wurden. 

Wenn Sie also eine Diskette haben, auf der sich Textdateien 
eines MS-DOS-Textprogramms befinden, vor allem dann, wenn 
es sich um eine reine ASCII-Datei ohne Textattribute wie Fett¬ 
schrift, Trennvorschläge etc. handelt, kann der Mega ST diese 
lesen. Es spielt keine Rolle, ob diese Diskette mit einem MS- 
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DOS-Rechner formatiert wurde. Der Grund: Das Format, in dem 
Disketten bei beiden Systemen formatiert und beschrieben wer¬ 
den, ist sich recht ähnlich. Ideal ist also in diesem speziellen 
Falle der Übertragung von Textdateien ein zweites Laufwerk im 
Format 5{ Zoll - die üblichen MS-DOS-Disketten können sofort 
verwendet werden. Noch besser ist es natürlich, wenn auch der 
benutzte MS-DOS-Rechner mit den 3i-Zoll-Laufwerken 
arbeitet, dann kann man das eingebaute Laufwerk verwenden. 

Wichtig: Mit einem MS-DOS-System können die Mega-ST- 

Disketten nicht ohne weiteres gelesen werden. Der 
Grund: Die Organisation der FAT (File Allocation 
Table) ist verschieden. Die FAT sorgt dafür, daß der 
Floppycontroller bzw. die Floppy erkennt, welche 
Datei sich wo auf der Diskette befindet. Das MS- 
DOS-System findet dann natürlich nichts und gibt 
eine Fehlermeldung aus. Man kann nun entweder per 
Software dafür sorgen, daß es doch geht, oder man 
wendet einen einfachen Trick an: Eine Diskette wird 
mit dem MS-DOS-Rechner formatiert und mit dem 
Mega ST beschrieben - die Dateien können dann von 
jedem MS-DOS-Rechner gelesen werden. 


PC-DITTO und die Folgen 

Lediglich Texte laden zu können, fiel so manchem Program¬ 
mierer schwer - also sann man auf Abhilfe. Bei der Systemnähe 
des Atari ST zur MS-DOS-Welt lag der Gedanke nahe, einen so¬ 
genannten MS-DOS-Emulator zu schaffen, eine Einrichtung, die 
dem ST beibringen sollte, MS-DOS-Software zu verarbeiten. Es 
gibt tatsächlich solche Lösungen. Besser ist sicher ein als Hard¬ 
ware ausgeführter Emulator, der ist nämlich schneller als jede 
Softwarelösung. Leider gibt es in dieser Hinsicht noch nicht viel 
zu berichten. Immerhin schaffte es aber ein Softwarehaus 
namens Avantgarde Systems, einen Software-Emulator herzu¬ 
stellen. PC-DITTO heißt dieses Programm, und es versetzt den 
Mega ST in die Lage, viele Programme für den IBM PC und 
seine Kompatiblen auszuführen. Dabei ist auch kein spezielles 
Laufwerk (siehe oben) nötig. Hat man kein 51-Zoll-Disketten- 
laufwerk, tut es auch die eingebaute Station - vorausgesetzt. 
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man hat MS-DOS-Programme auf 31-Zoll-Disketten, wie sie 
beispielsweise von den meisten tragbaren MS-DOS-Computern 
(Laptops) verwendet werden. 

Und siehe da - die Sache funktioniert, langsam zwar, aber es 
geht! Das Emulationsprogramm schafft es sogar, die Festplatte 
anzusprechen. Wir haben das Programm MS-Word ohne 
Probleme auf der Festplatte installiert und zum Laufen gebracht. 
Für professionelle Zwecke ist das Ganze wohl etwas zu langsam 
- alle Funktionen werden aber ohne Fehler ausgeführt. Die 
Ausführungsgeschwindigkeit liegt etwa bei einem Drittel von der 
eines Original-PC/XT von IBM. Und der ist schon recht lang¬ 
sam. Also: Für ernsthafte Anwendungen sollte man gute Hard¬ 
ware-Lösungen abwarten. 


Aladin mit Problemen 

Auch am bekannten Macintosh von Apple, ebenfalls einem 
Computer mit dem Prozessor 68000 von Motorola, vergriffen 
sich die Programmierer. Das Produkt hieß Aladin und ver¬ 
schaffte dem Mega ST und seinen "kleinen" Brüdern volle 
Lauffähigkeit von Mac-Programmen. Leider waren die Apple- 
Mannen weniger duldsam als die IBM-Mannschaft: Vor Gericht 
konnte man gegen den Aladin erfolgreich zu Felde ziehen. Da 
dies außerhalb der Bundesrepublik Deutschland offenbar nicht 
so einfach ist, gibt es den Aladin-Emulator immer noch. Dies 
nur, damit Sie es wissen. 


4.1.3 Die Festplatte am Mega ST 

Eine Festplatte funktioniert so ähnlich, wie es bei den Disket¬ 
tenlaufwerken beschrieben wurde. Nur befindet sich die Infor¬ 
mation hier auf einer magnetisierten Scheibe aus festem Material 
- d.h. eigentlich auf mehreren Scheiben, die übereinander ange¬ 
ordnet sind. Natürlich hat eine Festplatte dann auch mehrere 
Schreib-/Leseköpfe. Die magnetisierte Scheibe einer Festplatte 
befindet sich in einem hermetisch bzw. luftdicht abgeschlossenen 
Gehäuse. Daher ist es möglich, eine höhere Dichte der ge¬ 
speicherten Daten zu erreichen. 
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Bei der Atari Festplatte SH205 finden wir z.B. 2448 Spuren mit 
jeweils 17 Sektoren. Das ergibt rund 20 MByte formatierte 
Kapazität. Bei Festplatten spricht man gerne von unformatierter 
und formatierter Kapazität. Erstere ist immer deutlich größer. 
Nach, dem Formatieren, also einem Vorgang, der selbst einiges 
an Speicherkapazität benötigt, bleibt der eigentliche zur Ver¬ 
fügung stehende Speicherplatz der Festplatte übrig. Der 
wiederum kann, wie bereits im ersten Kapitel beschrieben, in 
sogenannte Partitions eingeteilt werden. Jede dieser Partitions 
wird wie ein eigenständiges Laufwerk behandelt (logisches 
Laufwerk), verfügt also auch über eine eigene FAT und einen 
Boot-Sektor. 

Der Vorteil einer Festplatte liegt eindeutig in der hohen 
Speicherkapazität sowie in der großen Geschwindigkeit, mit der 
auf die Daten zugegriffen wird. Verstärkt wird dieser Effekt 
durch die Tatsache, daß die Festplatte an den Mega ST über den 
DMA-Port angeschlossen wird. Dabei können bis zu acht Fest¬ 
platten gleichzeitig betrieben werden, da der DMA-Port durch¬ 
geschleift wird - jede SH205 hat sowohl einen Aus- als auch 
einen Eingang. Die ältere Festplatte SH204 hat leider nur einen 
Eingang, hier ist der Bastler gefragt. 

Neben den Originalfestplatten existieren noch einige Modelle 
von Fremdanbietern. Einige dieser Festplatten verfügen über 
eine erheblich höhere Kapazität, z.B. von 40 oder 60 MByte. 
Sehr zuverlässig zeigen sich beispielsweise die Festplatten der 
Firma Vortex. In der Regel lassen sich diese Festplatten ohne 
Probleme an den Mega ST anschließen. 


Hilfe für die Harddisk 

Nach einiger Zeit wird die Harddisk oft zum wahren "Daten- 
Dschungel". Das ist spätestens dann der Fall, wenn nicht mehr 
alle Einträge auf dem Bildschirm angezeigt werden können. Es 
gibt deshalb einige interessante Utilities, die dem Harddisk-Be¬ 
sitzer weiterhelfen. Ein Beispiel wollen wir hier kurz stellver¬ 
tretend vorstellen: Hard Disk Help von Application Service. 
Dieses Programm erlaubt es, ein Backup der Festplatte auf Dis¬ 
ketten zu erstellen. Das ist aber noch nicht alles - mit "Hard 
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Disk Tree" kann man sich ein komplettes Verzeichnis der Fest¬ 
platte mit allen Verzweigungen in Unterverzeichnisse auf den 
Bildschirm holen. Das hilft weiter, denn natürlich läßt sich das 
Verzeichnis auch ausdrucken. Außerdem besteht noch die Mög¬ 
lichkeit, Backups einer fehlerhaften Festplatte mit Recover zu 
erhalten. 

Harddisk-Utilities können eine Festplatte aber auch schneller 
machen: Der Disk-Accelerator von G. Sender Computerware 
beschleunigt eine SH205 bis zu einer Größenordnung von 300%. 
Wer einmal festgestellt hat, wie sehr eine Festplatte in der Ge¬ 
schwindigkeit nachläßt, wenn viele Daten darauf sind, weiß ein 
solches Programm sicher zu schätzen. 

Schließlich benötigt der ernsthafte Anwender eines Festplatten¬ 
laufwerkes noch einen Diskettenmonitor, mit dem er auf der 
Festplatte bei Problemen einmal nachschauen und eventuell ret¬ 
tend eingreifen kann. Das ist allerdings nur Leuten zu 
empfehlen, die mit der Organisation einer Festplatte vertraut 
sind. Solche Monitor-Programme für Festplatten sind kaum im 
Handel, dafür gibt es in der Fachliteratur um so mehr davon. 
Beispielsweise im Buch "Atari ST Floppy und Harddisk", er¬ 
schienen bei DATA BECKER, sowie im "Atari ST Program¬ 
mierhandbuch", erschienen im Verlag Markt & Technik. Zu 
beiden Büchern gibt es Disketten mit den im Text beschriebenen 
Programmen. 

Wichtig: Wenn Sie Ihren Laserdrucker angeschlossen haben, 

achten Sie darauf, daß er eingeschaltet ist! Beim 
Arbeiten mit Disketten und Festplatten mit ange¬ 
schlossenem, jedoch ausgeschaltetem Laserdrucker 
SLM804 kann es geschehen, daß Dateien auf der 
Festplatte oder Diskette zerstört werden. Soll der 
SLM804 also nicht benutzt werden, lösen Sie vor¬ 
sichtshalber alle Verbindungen des Druckers mit dem 
Mega ST, bevor Sie den Rechner und die Festplatte 
einschalten. Das Problem ergibt sich offenbar aus 
einer auftretenden Überlastung des DMA-Controllers 
und ist noch nicht so ganz gelöst. 
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4.1.4 Welcher Drucker für den Mega ST? 

Für die meisten Anwendungen auf dem Mega ST benötigt man 
eine Möglichkeit, Daten auch auf Papier auszugeben. Also 
brauchen wir einen Drucker. Geballte Technik verbirgt sich 
unter den unscheinbaren Gehäusen. Am Mega ST lassen sich fast 
alle handelsüblichen Drucker betreiben, vorausgesetzt, das ver¬ 
wendete Programm verfügt über einen entsprechenden Treiber. 
Wichtig ist jedoch, daß Sie mit der eingebauten Funktion des 
Mega ST auch eine Hardcopy des Bildschirms machen können 
und daß der Drucker die Zeichensätze des Computers auch 
wiedergeben kann. Und nicht zuletzt sollte darauf geachtet wer¬ 
den, daß der Drucker über einen einigermaßen großen Puffer¬ 
speicher verfügt. In diesen gelangen die Informationen, die der 
Drucker vom Computer erhält. Bei einer Größe von wenigstens 8 
KByte entlastet das den Computer, der wieder benutzt werden 
kann, bevor der Drucker seinen Druckvorgang beendet hat. Für 
teures Geld gibt es zusätzliche Puffer-Hardware, die erheblich 
mehr Daten Zwischenspeichern kann. Wer viel druckt, sollte sich 
diese Anschaffung einmal überlegen - man spart eine Menge 
Zeit und muß nicht warten, bis der Drucker den Mega ST 
wieder freigibt. Während des Datentransfers zum Drucker ist der 
Computer nämlich "gelähmt" für weitere Aktivitäten des 
Benutzers. 

Die Hardcopy-Funktion des Rollmenüs EXTRAS verlangt einen 
EPSON FX-85 oder FX-800 bzw. einen Drucker, der diese 
Modelle "emulieren" kann, also kompatibel ist. Andere Drucker 
würden nur fehlerhafte oder gar keine Ausdrucke liefern. Aller¬ 
dings gibt es für viele Drucker, die nicht EPSON-kompatibel 
sind, bereits Accessories, die man vor dem Drucken aktivieren 
kann. Diese sorgen dann für einen korrekten Ausdruck. Mit den 
Zeichensätzen gibt es weniger Probleme. Jeder Drucker, der 
über den sogenannten IBM-Zeichensatz verfügt, ist verwendbar. 
Die meisten Drucker lassen sich per DIP-Schalter auf diesen 
Zeichensatz einstellen, gleiches gilt für die deutschen oder für 
andere Sonderzeichen. 
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Das Accessory "Drucker Anpassung" 

Grundsätzlich können Sie die Art des Ausdrucks mit dem 
Accessory "Drucker Anpassung" bestimmen. Für Hardcopys mit 
einem normalbreiten Drucker (A4) müssen Sie die Punkte/Zeile 
auf 960 einstellen, sonst reicht der Platz auf einer Seite nicht für 
die gesamte Darstellung des Bildschirms. Die weiteren Einstell¬ 
möglichkeiten von "Drucker Anpassung" werden im folgenden 
kurz beschrieben. 


DRUCKER ANPASSUNG 


Drucker Typ: 

Farbe: 

Punkte/Zeile: 

Dualität: 
Drucker Port: 
Papier Typ: 



Typenrad 

Farbe 


960 


Maxinun 

Hoden 

Einzel 




Bild 47: Dialogbox "Drucker Anpassung" beim Mega ST 


Drucker Typ 

Hier haben Sie die Wahl zwischen einem Matrix- (Nadel-) bzw. 
einem Typenraddrucker. Was das ist, lesen Sie im nächsten 
Abschnitt. 
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Farbe 

Wenn Sie einen speziellen Farbdrucker haben, der mit mehreren 
Farbbändern arbeitet, können Sie auch farbige Grafiken bzw. 
Ausdrucke erstellen. Klicken Sie dann auf "Farbe". Ansonsten 
eben auf S/W (schwarzweiß), das ist auch die übliche Einstellung 
nach dem Booten des Mega ST. 


Punkte/Zeile 

Diese Einstellung bestimmt, ob Sie mit 1280 oder 960 
Punkten/Zeile arbeiten bzw. ausdrucken. Bei einem Drucker im 
DIN-A4-Format, was üblich ist, wählen Sie bitte 960 
Punkte/Zeile. 


Qualität 

Es gibt heute kaum noch einen Drucker, der nicht über die 
Möglichkeit verfügt, sogenannte NLQ-Schrift zu erzeugen. 
Durch besonders viele Nadeln im Druckkopf bzw. mehrmaliges 
Überdrucken einer Zeile wird eine besonders hoher Qualität er¬ 
reicht. TEST schaltet diesen Modus aus, während "Maximum" 
ihn einschaltet. 


Drucker Port 

Sie können hier wählen, ob Sie Ihren Drucker am seriellen oder 
parallelen Port des Mega ST betreiben wollen. Die meisten 
Drucker werden mit einer parallelen Schnittstelle geliefert, 
klicken Sie dann auf "Printer". Soll ein serieller Drucker einge¬ 
setzt werden, wählen Sie "Modem" - dann ist die serielle 
Schnittstelle aktiviert. Diese müssen Sie allerdings auch einstel¬ 
len, und zwar mit der Dialogbox RS232 Konfiguration. Die 
Baudrate sollte dann auf 9600 gesetzt werden. Die Einstellungen 
der übrigen Parameter der seriellen Schnittstelle müssen ebenso 
wie die Übertragungsrate mit den entsprechenden Einstellwerten 
der seriellen Schnittstelle des Druckers übereinstimmen. Sehen 
dazu im Einzelfall in die Beschreibung Ihres Druckers. Verges- 
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sen Sie auch auf keinen Fall, das Xon-/Xoff-Protokoll zu akti¬ 
vieren - sonst funktioniert der Drucker an der RS232C leider 
nicht. 


Papier Typ 

Schließlich kann noch zwischen Einzelblatt- und Endlospapier 
gewählt werden. Wählen Sie "Einzel", dann erfolgt nach jedem 
ausgedruckten Blatt die Abfrage, ob Sie ein neues Blatt eingelegt 
haben, bevor mit einem erneuten Mausklick im Ausdruck fort¬ 
gefahren wird. Mit "Endlos" wird kontinuierlich ausgedruckt, bis 
der gesamte Text vorliegt. 


Welche Druckertypen gibt es? 

Es gibt eine Reihe verschiedener Druckertypen, die auf unter¬ 
schiedliche Weise ihre Zeichen zu Papier bringen. Die 
wichtigsten wollen wir Ihnen nun vorstellen. 


Nadel- und Tintenstrahldrucker 

Nadeldrucker, auch Matrixdrucker genannt, arbeiten mit winzi¬ 
gen Nädelchen, die in der Regel einzeln angesteuert werden 
können. Dabei stechen diese Nädelchen auf ein Farbband, das 
sich zwischen Papier und Druckkopf befindet. Die Farbe des 
Farbbandes wird dadurch punktweise auf das Papier übertragen. 
Die Anordnung der Nädelchen im Druckkopf ergibt ein 
Punktraster (die Matrix). Je nachdem, wie viele der Nadeln ein¬ 
gesetzt werden, können verschiedene Zeichen dargestellt werden. 
Das kleinste Zeichen ist also ein Punkt, der von einer einzigen 
Nadel erzeugt wird. Das ist wichtig, denn nur so lassen sich 
beispielsweise Grafiken korrekt wiedergeben. 

Je mehr Nadeln ein Drucker hat, um so dichter können die 
Punkte gesetzt werden, was dem Druckbild sehr zugute kommt. 
Billige Geräte haben bestenfalls 9 Nadeln zur Verfügung. Bes¬ 
sere Matrixdrucker verfügen meist über 24 Nadeln, die oft ver¬ 
setzt zueinander angeordnet sind. Damit läßt sich eine Auflösung 
erreichen, die fast schon Laserdrucker-Qualität zeigt. Der NEC 
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P6, den wir jedermann empfehlen können, bringt es auf rund 
360 Punkte/Inch, das ist mehr als der SLM804 schafft. Aller¬ 
dings dauert ein solcher Ausdruck recht lange - und wenn das 
Farbband nachläßt, ist es vorbei mit der "Herrlichkeit". Leider 
verzichten noch immer viele Anwenderprogramme auf eine 
vollständige Ansteuerung aller Nadeln. 

Statt Nadeln benutzen Tintenstrahldrucker kleine Düsen bzw. 
eine Lochmaske. Man benötigt kein Farbband, da die Tinte 
direkt auf das Papier gespritzt wird. Ansonsten funktioniert ein 
Tintenstrahldrucker analog zum Matrixdrucker - mit einer 
wichtigen Ausnahme: Er ist fast geräuschlos. Wenn es also auf 
Ruhe ankommt, der Tintenstrahldrucker ist der ideale Partner. 


Typenraddrucker 

Bei diesen Druckern finden wir das gleiche Verfahren wie bei 
einer Typenradschreibmaschine. Die einzelnen Zeichen (Typen) 
sind auf einem Rad angeordnet. Das gewünschte Zeichen wird 
nun vor einen kleinen "Hammer" bewegt, nachdem das Typenrad 
an die entsprechende Stelle gedreht wurde. Dieser "Hammer" 
schlägt flexibel angeordnete Type kräftig auf ein Farbband - das 
Zeichen wird auf dem Papier abgebildet. 

Typenraddrucker eignen sich hervorragend zur Herstellung kor¬ 
respondenzfähiger Ausdrucke - wie eine gute Schreibmaschine. 
Der erste Nachteil: Grafik läßt sich mit einem Typenraddrucker 
nicht ausgeben. Der zweite Nachteil: Ein Typenraddrucker ist 
sehr langsam im Vergleich zu einem Matrixdrucker, ganz zu 
schweigen von einem Laserdrucker. Dafür gibt es Unmengen an 
verwendungsfähigen Typenrädern auf dem Markt - zu achten ist 
allerdings darauf, daß neue Typenräder, beispielsweise solche 
mit Sonderzeichen, kompatibel zu Ihrem Drucker sind. Obwohl 
es ein wenig lästig ist, bei einem Zeichensatzwechsel das 
Typenrad jedesmal wechseln zu müssen, ist ein solcher Drucker 
für die Korrespondenz nach wie vor unschlagbar. Besonders 
schön wird der Ausdruck, wenn Sie ein Einweg-Carbon-Farb- 
band benutzen. 
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Drucker anschließen - aber wie? 

In den meisten Fällen liegt dem Drucker beim Kauf ein An¬ 
schlußkabel bei. Ist das nicht der Fall, verwenden Sie zum An¬ 
schluß an die parallele Schnittstelle ein sogenanntes IBM- 
Druckerkabel, wie es im zweiten Kapitel beschrieben ist. Soll 
eine serielle Schnittstelle benutzt werden, wird es etwas kompli¬ 
zierter. Nehmen Sie ein handelsübliches V.24-Verbindungskabel, 
und versehen Sie es mit den in der weiter unten folgenden Ab¬ 
bildung beschriebenen Verbindungen sowie mit einem 
"weiblichen" und einem "männlichen" Stecker an den Kabelenden 
- fertig! Ein fertiges Kabel ist leider recht teuer - schützt aller¬ 
dings den Einsteiger vor Fehlern. 

Es gab mit den bisherigen ST-Modellen Probleme mit dem Pin 5 
der seriellen Schnittstelle. Das Betriebssystem TOS behandelte 
diesen Anschluß (CTS, Clear To Send), über den die Empfangs¬ 
bereitschaft des angeschlossenen Druckers abfragt wird, falsch. 
Man konnte also keinen Drucker korrekt anschließen. Aus¬ 
nahmen bestätigen die Regel: Bei manchen Druckern kann man 
das CTS-Signal, welches normalerweise aktiv sein muß, damit 
der Drucker seine Arbeit tut, durch Betätigung eines DIP- 
Schalters aktivieren. Dem Drucker wird dann ein ständig aktives 
Signal CTS vorgegaukelt. Mit dem Mega ST ist das gelöst: Der 
Pin 5 der RS232 wird nun korrekt behandelt. 

Wichtig: Im Gegensatz zur parallelen Schnittstelle, die eine 

sichere Datenübertragung lediglich über eine maxi¬ 
male Entfernung von rund 3 Metern garantieren 
kann, sind mit einer RS232 und einem guten seriel¬ 
len Kabel (Abschirmung) prinzipiell auch größere 
Strecken möglich - arbeiten Sie dann aber mit 
niedrigen Baudraten. Am besten ist auch hier eine 
maximale Kabellänge von ca. 3 Metern, was meist 
reicht. 

Ein passendes Kabel für den Anschluß eines seriellen Druckers 
ist schnell hergestellt: Besorgen Sie sich im Fachhandel ein 
serielles, abgeschirmtes Kabel. Des weiteren benötigen Sie zwei 
D25-Sub-Stecker, ein "Weibchen", also die Buchsenform, und ein 
"Männchen", die Steckerversion des D25-Sub. Wenn der Drucker 
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auch ein "Weibchen" als Eingang aufweist, benötigen Sie natür¬ 
lich zwei D25 in Steckerversion. Lachen Sie nicht - die etwas 
schlüpfrigen Bezeichnungen sind im Fachhandel und unter ge¬ 
standenen Lötkolben-Benutzern allgemein üblich. Die Pins der 
D25-Stecker sind allesamt der Norm gemäß numeriert - von 1 
bis 25. Verbinden Sie nun mit Hilfe eines Lötkolbens und etwas 
Geschick die benötigten Pins gemäß der folgenden Abbildung, 
die freibleibenden Leitungen brauchen nicht verbunden zu 
werden, sie werden nicht benötigt. 


Serielle Schnittstelle Hega ST 

2 3 5 6 7 8 20 


Pin Nr. 

X 


2 3 4 5 6 7 8 _ 19 20 

Serielle Schnittstelle Drucker 




Bild 48: So wird ein Drucker an die RS232 angeschlossen 


Serielle Drucker können oft auch Laserdrucker sein. Der HP 
LaserJet wird z.B. sehr gerne über die serielle Schnittstelle an¬ 
geschlossen. Für den Anschluß eines Modems kann das oben 
beschriebene Kabel nicht verwendet werden: Wegen der vor¬ 
handenen gekreuzten Leitungen liegt praktisch ein Nullmodem 
vor, wie es bei der direkten Übertragung zwischen zwei Com¬ 
putern Anwendung findet. Über dieses Thema haben wir Sie ja 
bereits im zweiten Kapitel informiert. 
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4.1.5 Der Atari-Laserdrucker SLM804 

Der SLM804 war eine echte Sensation, als er auf dem Markt er¬ 
schien. Inzwischen hat man sich an ihn gewöhnt - die erste 
Euphorie ist vorbei und hat kritischer Distanz Platz gemacht. Es 
stellte sich aber heraus, daß man die alten ST-Modelle ohne 
weiteres mit dem SLM804 betreiben kann - und daß das Kon¬ 
zept mit der fehlenden "Intelligenz" des Druckers und ausge¬ 
lagertem Controller durchaus Freunde gewinnen konnte. Bevor 
wir aber jetzt einige Tips geben, wie Sie dem SLM804 Ergeb¬ 
nisse entlocken können, soll das Prinzip dieses Gerätes erläutert 
werden. Wie funktioniert eigentlich ein Laserdrucker? 


Wie ein Laserdrucker funktioniert 

Auch ein Laserdrucker arbeitet punktweise, ähnlich wie ein 
Matrixdrucker. Damit sind die Ähnlichkeiten aber auch schon 
gesagt. Der entscheidende Unterschied liegt in der Art und 
Weise, in der das Ergebnis zu Papier gebracht wird. Laser¬ 
drucker gehören zur Familie der Seitendrucker - es wird immer 
eine komplette Seite ausgedruckt, die vollständig im Puffer des 
Druckers vorhanden ist. Diesen Puffer, für eine Seite benötigt 
man rund ein MByte Speicherplatz, hat unser SLM804 bekannt¬ 
lich nicht, auch nicht die nötige Intelligenz, um diese Seite selbst 
aufzubereiten. Dazu benötigen wir, wie schon erwähnt, das 
RAM unseres Mega ST. 

Wie funktioniert aber nun der eigentliche Druckvorgang? Bei 
einem Seitendrucker macht man sich die Kräfte der Elektrostatik 
zunutze. Die vom Computer gelieferten Bilddaten werden von 
einem Controller verarbeitet und mittels Lichtstrahlen auf eine 
mit photosensitivem, also lichtempfindlichem Material beschich¬ 
tete Walze geschrieben. Dabei handelt es sich nicht um eine 
chemische Reaktion, sondern um einen elektrostatischen Effekt: 
Die Oberfläche der Walze wird mit hoher Spannung aufgeladen. 
Fällt nun das Licht auf Bereiche der aufgeladenen Oberfläche, 
wird diese an den betreffenden Stellen entladen. Diese ent¬ 
ladenen Stellen werden später auf der ausgedruckten Seite weiß 
bleiben. Die nicht entladenen Stellen (die mit rund 1000 Volt 
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aufgeladen sind) bilden die zu druckenden Zeichen bzw. Grafik¬ 
punkte und stellen eine inverse Darstellung der Seite dar, ein 
sogenanntes Image. 

Als Lichtquelle dient bei einem Laserdrucker meist ein Halb- 
leiter-Dioden-Laser, dessen Licht nicht direkt auf die licht¬ 
empfindliche Walze fällt, sondern von einem Reflektorsystem 
(rotierender, mehrflächiger Spiegel, dessen Bewegung mit der 
Rotation der Walze vom Controller synchronisiert wird) gezielt 
auf die Walze gelenkt wird. Die Energie dieses Lichts ist ent¬ 
scheidend für die Geschwindigkeit des Ausdrucks, denn je höher 
die Energie des einfallenden Lichtes, desto schneller kann eine 
Stelle der Walze entladen werden. Teure Laserdrucker verwenden 
daher einen energiereicheren Edelgas-Laser, beispielsweise einen 
Argon-Laser. Übrigens muß die Lichtquelle eines Seitendruckers 
nicht unbedingt aus einem Laser bestehen - NEC z.B. bietet 
einen Drucker an, bei dem diese Aufgabe (nach dem gleichen 
Prinzip wie beim Laser) von LEDs, also Leuchtdioden wahrge¬ 
nommen wird. 

Doch weiter in der Funktionsbeschreibung des Laserdruckers. 
Die Walze mit der (noch unsichtbaren) durch die Ladungen ge¬ 
bildeten Inversdarstellung der Seite rotiert nun an einem Be¬ 
hälter vorbei, der sogenannten Toner enthält, gewissermaßen die 
Farbe, mit der unser Drucker etwas zu Papier bringt. Zwischen 
dem Toner und den aufgeladenen Stellen der Walze besteht nun 
ein erheblicher Potentialunterschied, der dazu führt, daß die 
sehr feinen Staubpartikel des Toners (mit niedrigem Potential) 
von den mit rund 1000 Volt aufgeladenen Walzenbereichen an¬ 
gezogen werden und sich dort sichtbar anordnen. Auf der Walze 
entsteht ein Negativ der zu druckenden Seite. Der letzte Schritt 
besteht jetzt darin, daß die Walze den Tonerstaub auf Papier 
rollt, das höher aufgeladen ist als die Walzenoberfläche. Auf¬ 
geladen wird das Papier durch den sogenannten "Corona-Draht". 
Der Staub wandert deshalb auf das Papier. Schließlich wird 
dieses Papier noch erhitzt, und der Tonerstaub brennt in die 
Seite ein - sonst könnten wir ihn gleich wieder runterblasen! Zu 
guter Letzt kommt die fertige Druckseite aus dem Ausgabe¬ 
schlitz des Druckers. 
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So einfach wie diese Beschreibung ist die Sache natürlich nicht, 
das Prinzip dürfte aber jetzt klar sein. Zur besseren Anschauung 
sollten Sie sich die folgende Grafik ansehen, die die grundsätz¬ 
lichen Abläufe in einem Laserdrucker vereinfacht darstellt. 


Control1er 


CHD- 


Computer 


Toner-Behälter 


Laser-Quelle 


Spiegelsysten 



Unbedrucktes 

Papier 


Bedruckte Seiten 


Lichtenpfindliche "Einbrennen" 

Walze des Tonerstaubes 


Bild 49: Die Arbeitsweise eines Laserdruckers 


Der "dumme" SLM804 

Ein normaler Laserdrucker besitzt einen eigenen Prozessor, oft 
ist es ein Motorola 68000 oder gar ein 68020. Der übernimmt die 
Steuerung des Druckers. Weiterhin verfügt ein solcher handels¬ 
üblicher Laserdrucker über nicht unbeträchtliche RAM-Kapazi- 
täten. Üblich sind wenigstens ein bis zwei MByte Speicher. Der 
Atari-Laser enthält aber nicht mehr als die nackte Mechanik 
eines Laserdruckers. Der Controller ist als eigenes Gerät ausge- 
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lagert, und die Rechenleistung sowie das nötige RAM stellt der 
Mega ST zur Verfügung. Die Steuerung des Controllers bzw. des 
Laserdruckers erfolgt deshalb mit einem Emulationsprogramm. 

Die Auflösung des Laserdruckers beträgt 300 x 300 Punkte/Inch. 
Das entspricht dem marktüblichen Wert. Eine komplette Seite 
hat daher eine Gesamtauflösung von 3386 mal 2336 Punkten. Da 
eine normale Grafikseite also rund ein MByte RAM bean¬ 
sprucht, kann man den SLM804 mit den alten ST-Modellen ohne 
spezielle Vorkehrungen nur sehr bedingt benutzen. Es geht aber 
immerhin - wenn man sich auf Hardcopys des Bildschirms oder 
einfache Textseiten beschränkt. Der unten erwähnte Emulator 
Laserbrain erlaubt allerdings den Einsatz mit allen ST-Typen. 
Mit unserem Mega ST bleibt jedoch für jede denkbare Applika¬ 
tion genügend Speicherplatz übrig. Wir haben dafür aber andere 
Probleme. Zum Beispiel die Ansteuerung über den DMA-Port. 
Der DMA-Port wird deshalb benutzt, weil gut und gerne 7,5 
MByte innerhalb einer Minute zu übertragen sind - will man die 
standardmäßigen 8 Seiten/Minute ausdrucken. Solche Daten¬ 
mengen lassen sich mit dieser hohen Geschwindigkeit nur mit 
DMA handhaben. Es besteht also die Notwendigkeit, alle 
Druckerbefehle auf die DMA-Schnittstelle umzuleiten. Atari 
liefert zu diesem Zweck einen Emulator mit dem SLM804. 

Leider funktioniert der Emulator nicht mit jedem Programm, es 
müssen eigene Druckertreiber erstellt werden. Der gelieferte 
Emulator kann lediglich einen Typenraddrucker des Typs Diablo 
emulieren - Grafik läßt sich damit nicht ausdrucken. Viele 
Softwarehäuser arbeiten bereits an Treibern für die DMA- 
Schnittstelle und den Atari-Laserdrucker. Manche hatten auch 
schon Erfolg. Und zwar nicht nur die Anbieter von DTP-Pro- 
grammen, die mittlerweile nahezu alle einen Treiber für den 
SLM804 bieten können. Im Anschluß an die Beschreibung des 
Zusammenbaues des SLM804 und der mitgelieferten Programme 
werden wir Ihnen noch ein hochinteressantes Emulationspro¬ 
gramm für den SLM804, das bereits erwähnte Laserbrain, 
näherbringen. 
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Laser-Puzzle - SLM804 zusammenbauen 

Der SLM804 wird in Einzelteilen geliefert. Keine Angst, es sind 
nicht viele, und der Zusammenbau ist leicht. Die verschiedenen 
Elemente wollen wir kurz mit ihrer Funktion aufführen: 


Die lichtempfindliche Walze 

Auf dieser Walze entsteht das oben beschriebene Inversbild der 
späteren Druckseite. Die Oberfläche ist sehr empfindlich gegen 
mechanische Beanspruchungen. Ist die Oberfläche einmal ver¬ 
kratzt, ist eine neue Walze fällig, denn jeder Kratzer ist später 
auf dem Ausdruck zu sehen. Außerdem ist die Walze ja licht¬ 
empfindlich - man sollte sie nicht länger als nötig im Licht las¬ 
sen. Die Walze wird mit der Kombination aus Tonerbehälter und 
Tonerpatrone zusammengeklinkt (beachten Sie die Abbildungen 
im Handbuch) und in den Drucker eingelegt. Nach dem Zuklap¬ 
pen wird die Walze mitsamt dem Tonerbehälter an die Oberseite 
des Druckers befördert. Bei einem späteren Ausbauen muß ein 
weiterer Riegel an der rechten Seite des Druckergehäuses ent¬ 
riegelt werden. Nach dem eigentlichen Öffnen mit dem großen 
Hebel an der rechten Seite liegt das Ganze dann wieder auf dem 
unteren Gehäuseteil. Die Walze hat nach Aussage von Atari eine 
Lebensdauer von ungefähr 10000 Seiten, danach muß sie vor¬ 
aussichtlich gewechselt werden. 


Der Tonerbehälter und die Tonerpatrone 

Der Tonerbehälter wird vor dem Einbau an die oben be¬ 
schriebene Walze geklinkt. In den Tonerbehälter stecken wir zu¬ 
vor noch die in einem staubdichten Beutel befindliche Toner¬ 
patrone. Vor dem Einbau wird die Patrone leicht hin- und her¬ 
bewegt, damit sich das Tonerpulver besser verteilt. Passen Sie 
auf, daß Sie nichts von dem Toner verschütten - verschmutzte 
Kleidung und Hände sind kaum sauber zu kriegen. 

Nach dem Einbau der Walzen-/Tonerbehälter-Kombination in 
den Drucker müssen Sie noch das Klebeband entfernen, mit dem 
die Patrone verschlossen ist. Es läßt sich zur Seite herausziehen. 
Jetzt ist der Drucker fast betriebsbereit. 
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Bild 50: Das Innenleben des Atari-Laserdruckers 


Eine Tonerladung reicht je nach Anwendungsweise für ungefähr 
3000 Seiten. Werden viele schwarze Flächen gedruckt, braucht 
man mehr Toner und wird deshalb schon erheblich früher zur 
Kasse gebeten - eine neue Patrone kostet um die DM 200,-. 
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Auch sollte die Intensität Density mit einem Drehknopf an der 
Gehäuserückseite des SLM804 auf die niedrigste Einstellung ge¬ 
bracht werden, die eine guten Ausdruck ergibt. 


Der Controller SLMC804 

Dies ist die Steuereinheit des Laserdruckers, die für die Ver¬ 
bindung zwischen Computer und SLM804 zuständig ist. Die 
Verbindung zwischen SLMC804, Drucker und Mega ST sowie 
einer oder mehrerer Festplatten erfolgt wie im ersten Kapitel 
beschrieben. Die beiden Leuchtdioden auf der Frontseite zeigen 
an, ob Daten an den Drucker gesendet werden (gelbe Diode) 
bzw. ob der Drucker und der Controller mit Strom versorgt wer¬ 
den (grüne Diode). Die Stromversorgung der Steuereinheit er¬ 
folgt über den Drucker. Der SLMC804 kann sechs grundsätzliche 
Kommandos, die im Handbuch zum SLM804 dokumentiert sind, 
verstehen und an den Drucker liefern. Diese sind: 


Request Sense (0x03) 
Print (0x0a) 

Inquiry (0x12) 

Mode Select (0x15) 
Mode Sense (Oxla) 
Stop Print (Oxlb) 


Abfrage des Druckerzustandes (Status) 
Druck in Hochauflösung beginnen 
Kennung Laserdrucker abfragen 
Druckparameter einstellen 
aktive Druckparameter ermitteln 
Endlosdruck stoppen 


Ist der Laserdrucker komplett zusammengebaut, lohnt noch ein 
Blick auf die verschiedenen Möglichkeiten, Papier einzulegen. Es 
gibt zwei grundsätzliche Methoden: die Magazinzuführung und 
die manuelle. Letzterem Zweck dient der schmale Schlitz an der 
Frontseite des Druckers, oberhalb der großen Öffnung, in die 
das Papiermagazin eingesteckt wird. Hier können Sie fast alles 
hineinstecken, was aus Papier oder folienähnlich ist. Sogar 
Visitenkarten auf dünnem Karton oder Postkarten lassen sich 
bedrucken. Alle Blätter werden automatisch gewendet und liegen 
nach dem Ausdrucken in der richtigen Reihenfolge. 


Wichtig: Verwenden Sie niemals den manuellen Einzug, wenn 

ein gefülltes Papiermagazin im Drucker ist - ein 
Papierstau wäre die Folge. Ebenso schädlich ist es. 
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stärkeres Material wie z.B. dünnen Karton automa¬ 
tisch einziehen zu lassen. 


Die Atari-Programme zum Laserdrucker 

Dem SLM804 liegt eine Diskette bei, ohne die Sie Ihrem Laser¬ 
drucker sicher nicht viel entlocken werden. Bevor wir den 
Drucker in Betrieb nehmen, müssen diese Programme installiert 
werden. Wir wollen uns die Funktion der Programme einmal der 
Reihe nach ansehen: 


Diab630.PRG 

Das ist das eigentliche Emulationsprogramm. Es wird ein 
Typenraddrucker des Typs Diablo630 emuliert, so daß mit ver¬ 
schiedenen Textprogrammen wie Ist Word Plus oder 
BECKERtext ST ein recht komfortables Arbeiten in Korrespon¬ 
denzqualität möglich ist. Der Emulator erlaubt es zwar nicht, 
sämtliche bekannten Kommandosequenzen des Diablo-Typenrad- 
druckers zu nutzen, die wichtigsten werden jedoch unterstützt. 
Hinzu kommen einige zusätzliche Möglichkeiten, die wiederum 
ein realer Diablo-Drucker nicht hat - beispielsweise das Drucken 
in Outline-Schrift. Das Programm Diab630.PRG wird normaler¬ 
weise im AUTO-Ordner der Bootdisk bzw. dem entsprechenden 
Verzeichnis der Festplattenpartition C abgelegt. So wird der 
Emulator jedesmal automatisch gestartet, wenn das System ge¬ 
bootet wird. Das Programm beginnt dann mit dem Laden 
diverser Zeichensätze, im Englischen - und mittlerweile auch bei 
uns, nennt man solche Zeichensätze auch "Fonts", falls solche 
vorhanden sind und mit dem weiter unten beschriebenen Pro¬ 
gramm Setup630.PRG zuvor installiert wurden. Der Ladevorgang 
der Zeichensätze wird auf dem Bildschirm angezeigt. 


Setup630.PRG 

Dieses Programm dient der Anpassung der Emulatorfunktion an 
die Bedürfnisse des Anwenders bzw. der eingesetzten Textver¬ 
arbeitung. Das Programm Diab630.PRG wird entsprechend ver¬ 
ändert, so daß es beim Booten mit den geänderten Einstellungen 
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gestartet wird. Neben der Einstellung verschiedener Druck¬ 
parameter erlaubt das Programm die Installation verschiedener 
Zeichensätze, die mit dem Emulator verwendet werden können. 
Schließlich informiert Setup630.PRG noch über den aktuellen 
Status des SLM804 (ziemlich überflüssig, denn diese Information 
gibt der Drucker schon über sein Anzeigenfeld) und erlaubt 
Testausdrucke, einen Reset des Druckers sowie, falls nötig, das 
Senden eines Formfeeds 

(Seitenvorschubs) an den Drucker, sofern noch Daten im 
Speicher sind, die aus irgendeinem Grund nicht ausgedruckt 
wurden. 


Desk Options Style 



Abb. 51: Einstellen der Druckparameter mit Setup630 


Nach dem Starten des Programms durch Doppelklick auf 
Setup630.PRG erscheinen eine Leiste mit drei Rollmenüs sowie 
eine Menübox mit verschiedenen voreingestellten Druckpara¬ 
metern. Sie können diese Parameter nun verändern oder mit 
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einem Klicken auf die Abbruchbox ohne Veränderungen fort¬ 
fahren. Die folgenden Einstellungen lassen sich vornehmen: 

DATA SOURCE: Hier kann bestimmt werden, woher der 

Emulator seine zu druckenden Daten be¬ 
zieht. Mit "INTERNAL" geschieht dies 
durch das verwendete Textprogramm, 
wird "SERIAL" gewählt, erfolgt die 
Datenzufuhr von einem über die serielle 
Schnittstelle angeschlossenen Gerät her. 
Es ist also möglich, mit einem Nicht- 
Atari-System (z.B. Amiga) Daten über 
den Laserdrucker auszugeben. Die 
Grundeinstellung ist allerdings 
"INTERNAL". 

PITCH: Hiermit wird die Zeichendichte einge¬ 

stellt, mit der gedruckt werden soll. 
Voreingestellt ist "PROP" bzw. 
Proportionalschrift. In diesem Falle kann 
von einer fixen Zeichendichte (gemessen 
in CPI bzw. "characters/inch") nicht ge¬ 
sprochen werden, da sie sich ständig je 
nach Breite der Zeichen ändert. Damit 
das verwendete Textprogramm auch 
intern eine korrekte Formatierung des 
Textes vornimmt, muß die eingestellte 
Zeichendichte auch im Programm einge¬ 
geben werden. 

PRINT PAGES: Die Einstellung teilt dem Drucker mit, 

ob sämtliche oder lediglich ungerade oder 
gerade numerierte Seiten ausgedruckt 
werden sollen (interessant bei doppel¬ 
seitigem Druck). 

Falls Ihre Textverarbeitung kein CR bzw. 
"carriage return" sendet, wird dies bei 
"ON" vom Emulator erledigt. Die 
Grundeinstellung ist "OFF". 


AUTO <CR>: 
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AUTO LINE FEED: Nach jeder Druckzeile wird automatisch 

ein LF bzw. ein Zeilenvorschub an den 
SLM804 gegeben. Entweder benutzt man 
diese Funktion, um ein fehlendes LF der 
Textverarbeitung zu ersetzen oder zum 
Drucken in zweizeiligem Abstand. Ähn¬ 
liches gilt für DOUBLE LINE FEED, 
hier werden gleich zwei Zeilen eingefügt. 
Normalerweise sind diese Einstellungen 
"OFF”. 


UPPERCASE: Veranlaßt den Drucker, alle Ausgaben in 

Großbuchstaben vorzunehmen. Vorein¬ 
gestellt ist "OFF". 

INIT 8 COL TABS: Es werden bei "ON" in Abständen von 8 

Spalten Tabulatoren gesetzt. Default ist 
auch hier wieder "OFF". 


STRIP BIT 7: Je nachdem, ob Ihre Textverarbeitung 

mit 7 oder 8-Bit-Daten arbeitet, muß 
dieser Parameter auf "ON" oder "OFF" 
stehen. Default ist "OFF", es wird mit 8 
Bit gearbeitet. 


Nach dem Einstellen der Druckparameter wird durch ein 
Klicken auf "OK" die Konfiguration erst einmal temporär ge¬ 
sichert. Später erfolgt dann das dauerhafte Sichern des ver¬ 
änderten Emulatorprogrammes mit Hilfe eines eigenen Menü¬ 
punktes (s.u.). Zuerst allerdings sollten die gewünschten 
Zeichensätze installiert werden. 


Fonts installieren mit Setup630 

Atari liefert auf der dem Laserdrucker beigelegten Diskette mit 
Hilfs- und Installationsprogrammen einige Fonts, die mit dem 
Rollmenü "Style" ausgewählt und installiert werden können. Dazu 
müssen sich die Fontdateien mit der Extension ".FNT" im 
gleichen Verzeichnis befinden wie das Setup630.PRG selbst. Die 
standardmäßigen Fonts auf der Diskette sind: 
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LISTING.FNT mit 15 CPI 
TYPE 1 OLS.FNT mit 10 CPI 
ATTP1 OLS.FNT mit 10 CPI 

Damit läßt sich schon einiges anfangen. Während der LISTING- 
Font mit einer Zeichendichte von 15 CPI nicht mit Schriftat¬ 
tributen wie kursiv oder outline versehen werden kann (der 
Versuch kann zu Datenverlusten führen), sieht das bei den 
anderen beiden Fonts schon anders aus. Bevor wir jedoch zeigen, 
wie das Ausstatten von Fonts mit Attributen sowie die Installa¬ 
tion dieser Fonts vor sich geht, noch ein Hinweis: Sollten die 
vorhandenen Zeichensätze dem Anwender nicht ausreichen, las¬ 
sen sich jederzeit auch alle anderen eventuell vorhandenen 
GEM-Zeichensätze mit der Extension ".FNT" verwenden. Solche 
Fonts finden sich bei vielen Programmen unter GEM für den ST 
- so z.B. Easydraw. 

Zum Installieren eines Fonts wird im Rollmenü "Options" die 
Option "Install Fonts" angewählt. Es erscheint die Select-Box des 
Bildes 52. Alle im aktuellen Verzeichnis vorhandenen Zeichen¬ 
sätze mit der Extension ".FNT" werden nun angezeigt. Diese 
stehen nun für die Installation bereit. Das bloße Vorhandensein 
genügt noch nicht. Der erste gewünschte Font wird nun einmal 
mit dem Mauszeiger angeklickt und erscheint in inverser Dar¬ 
stellung. Auf der rechten Seite der Box wird nun eines der 
leeren Felder ebenfalls angeklickt. Ein weiteres Klicken auf 
"INSTALL" läßt den ausgewählten Font am bisher leeren Platz 
namentlich erscheinen - der Font ist installiert. Bis zu acht ver¬ 
schiedene Zeichensätze lassen sich auf diese Weise installieren. 
Die acht zur Verfügung stehenden Font-Einträge werden von 
Atari als "Slots" bezeichnet. Der Font auf dem obersten Platz der 
Slot-Liste wird als Default-Zeichensatz behandelt und kann, im 
Gegensatz zu den anderen Zeichensätzen, nicht mit REMOVE 
gelöscht werden. Ersetzt und verändert werden kann er aber 
schon. Das Aussehen eines Fonts kann übrigens mit "Examine 
Font" betrachtet werden. Dabei werden allerdings keine 
Attribute angezeigt, nur der unveränderte Zeichensatz. Mit 
"TEMP ORDER" können Fonts vorübergehend installiert wer¬ 
den, ohne diese dauerhaft zu speichern, mit RESTORE wird der 
vor einer Veränderung bestehende Zustand wiederhergestellt - 
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alle Veränderungen werden mit diesem Kommando rückgängig 
gemacht. 


Zeichensatz-Attribute zuordnen 

Das Aussehen der Fonts kann nun mit Hilfe des Rollmenüs 
"Style" verändert werden. Zu diesem Zweck wird der Fontname 
in der Liste der installierten Zeichensätze angeklickt. Danach 
kann man in "Style" zwischen "Bold" (Fett), "Lighten" (helle bzw. 
magere Schrift), "Italicize" (kursiv) und "Outline" (umrandet) 
auswählen. Es lassen sich auch Attribute kombinieren, z.B. fett 
und kursiv. Aktivierte Attribute werden durch ein Häkchen ge¬ 
kennzeichnet. Nach dem Anklicken der gewünschten Attribute 
werden diese mit "Install Style" dem jeweils invers dargestellten 
Font zugeordnet. Dabei erscheint der Fontname mit den ge¬ 
wünschten Attributen in der Liste. 


Desk Options Style 



Bild 52: Font-Installation mit Setup630 - in der rechten Liste befinden sich be¬ 
reits vier mit unterschiedlichen Attributen installierte Versionen des 
Fonts TYPE10LS sowie der Font LISTING 
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Lighten 
W Italicize 
Outline 


Installed 


TYPE10LS.FHT 

TYPEIBLS 






TYPEIBLS.FNT 


TYPEXOLS 

LISTING .FNT 


I REMOVE | 


Bild 53: Der Font TYPEIOLS wird mit dem Attribut "kursiv" ausgestattet 


Sichern von Diab630.PRG 

Es können nun, wenn gewünscht, weitere Attribute zugeordnet 
werden. Sind alle Veränderungen vorgenommen, muß die neue 
Einstellung des Diab630.PRG noch gesichert werden. Hierzu 
klickt man auf "DONE" und anschließend im Rollmenü "Options" 
auf "Save Emulator". Die Box in Abbildung 54 erlaubt das 
Sichern des Emulators im aktuellen (current) Verzeichnis, also 
dort, wo sich das Setup630.PRG und die Fonts befinden. In 
diesem Falle muß das Programm jedesmal mit dem üblichen 
Doppelklick gestartet werden. Wahlweise kann man 
Diab630.PRG aber auch im AUTO-Ordner ablegen, dann erfolgt 
der Start beim Booten des Rechners. Weiterhin findet sich die 
Frage, ob man die "front panel changes" zu sichern gedenke. 
Hiermit sind eventuelle Veränderungen der Druckparameter ge¬ 
meint ("Printer settings", s.o.). Sind dort keine Veränderungen 
erfolgt, lautet die Antwort NO. Dies ist Standard, falls lediglich 
Fonts geändert wurden. Nach dem Klicken auf OK wird das 
neue Emulator-Programm gesichert. 
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Save DI0B630.PRG to 


I <CURREHT> I 


Save front panel changes also? 


I CBHCEL I 


\AUT0\ 
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Bild 54: Das Sichern des veränderten Diab630.PRG 


Drucken mit Diab630 

An zwei Beispielen wollen wir nun noch zeigen, wie man ein 
Textprogramm mit dem Diablo-Emulator einsetzen kann. Beide 
zeigen, wie die unterstützten Escape-Sequenzen eines Diablo- 
Typenraddruckers in eine Druckeranpassung eingebaut werden 
können. Voraussetzung für leichtes Einbinden ist, daß die ver¬ 
wendete Textverarbeitung Druckerdateien im ASCII-Format be¬ 
nutzt bzw. bereitstellt. Solche Dateien kann auch ein wenig er¬ 
fahrener Computerbenutzer leicht verändern, man findet diese 
Druckertreiber-Dateien z.B. bei BECKERtext ST und IST Word 
bzw. IST Word Plus. Die Datei-Extensionen sind ".PRT" 
(BECKERtext) und ".HEX" (IST Word). Man lädt solche Files 
im ASCII- oder Source-Modus des jeweiligen Textprogrammes 
und speichert sie auch in diesem Modus ab. Die erste Spalte des 
Druckertreiber-Textes enthält jeweils die programminternen 
Steuerzeichen, dahinter folgen die Steuersequenzen für den 
Drucker bzw. die Emulation. Mit wenigen Ausnahmen beginnt 
jede Sequenz mit einem "Escape" bzw. dem entsprechenden 
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Dezimalwert "27". Durch Kommata getrennt folgen dann die je¬ 
weiligen Steuercodes. Beispielsweise lautet die Initialisierungsan¬ 
weisung für den Diablo630-Emulator/Drucker: 27,13,80. Eine 
Eingabe in ASCII ist ebenfalls möglich, dann lautet die Sequenz: 
ESC CR P. Wir wollen uns jedoch auf die dezimale Schreibweise 
beschränken. 

Die Bedeutung der programminternen Codes geht aus den Hand¬ 
büchern der entsprechenden Textverarbeitungen hervor. Eine 
einfache Anpassung für BECKERtext ST zeigt das Bild 55. Eine 
entsprechende Datei für IST Word Plus finden Sie in Bild 56. 
Die Anwahl des Zeichensatzes mit fetter und kursiver Schrift 
erfolgt mit speziellen Sequenzen, denn diese Schriftarten sind 
beim Emulator den Slots (Listenplatz in der Zeichensatz-Aus¬ 
wahlbox, s.O.) "2" (fett) und "3" (kursiv) fest zugeordnet. Sie 
sollten diese Attribute daher in diesen Slots installieren. Beim 
Aufruf des Attributs "fett" mit dem entsprechenden Diablo- 
Steuerkommando benutzt der Emulator automatisch den in "2" 
installierten Font, bei "kursiv" gilt dies ebenso für Slot "3". 
Weitere Zeichensätze werden immer mit dem gleichen Kom¬ 
mando ausgewählt - nur die Nummer des Slots ändert sich. Der 
Font im ausgewählten Slot wird dann zum Grund-Zeichensatz. 
Nach dem Aufruf und Einsatz des jeweiligen Zeichensatzes muß 
wieder auf den Font in Slot "1", den ursprünglichen Grund- 
Zeichensatz, zurückgeschaltet werden. Die übliche Sequenz zum 
Umschalten auf den Grund-Font funktioniert ja nicht mehr, 
weil ein anderer Zeichensatz diese Funktion jetzt ausübt. 

Die folgenden Kommando-Sequenzen werden vom Diablo- 
Emulator für den SLM804 verstanden und ausgeführt: 


Grundfunktionen: 

Leerzeichen: 
ASCII: SP 

Dezimal: 32 
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Backspace: 

ASCII: S 

Dezimal: 8 

Carriage Return: 

ASCII: CR 

Dezimal: 13 

Horizontaler Tabulator: 
ASCII: HT 

Dezimal: 9 

Vertikaler Tabulator: 
ASCII: VT 

Dezimal: 11 

Zeilenvorschub: 

ASCII: LF 

DEZIMAL: 10 

Seitenvorschub: 

ASCII: FF 

Dezimal: 12 


Steuercodes Diablo 630/SLM804 

Oberen Textrand setzen: 

ASCII: ESC T 

Dezimal: 27,84 


Unteren Textrand setzen 
ASCII: ESC L 

Dezimal: 27,76 
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Oberen und unteren Rand löschen: 
ASCII: ESC C 

Dezimal: 27,67 


Linken Rand setzen: 
ASCII: ESC 9 

Dezimal: 27,57 


Rechten Rand setzen: 
ASCII: ESC 0 

Dezimal: 27,48 


Horizontaltabulator setzen: 

ASCII: ESC 1 

Dezimal: 27,49 

Horizontalen Tabulator löschen: 

ASCII: ESC 8 

Dezimal: 27,56 

Vertikalen Tabulator setzen: 

ASCII: ESC - 

Dezimal: 27,45 

Tabulatoren gesamt löschen: 

ASCII: ESC 2 

Dezimal: 27,50 

Zeilen je Seite 

ASCII: ESC FF a (für a kann ein Wert von 1 bis 126 

gewählt werden) 

Dezimal: 27,12,a 

Zeilendichte einstellen: 

ASCII: ESC US a 

Dezimal: 27,31,a 
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Die horizontale Bewegung des Druckkopfes wird nach der 
Formel a-1 gesetzt, wobei a einen Wert von 1 bis 126 einnehmen 
darf, a entspricht Einheiten von 1/120 inch. 


Zeichendichte löschen: 
ASCII: ESC S 

Dezimal: 27,83 


Absoluter Tabulator: 

ASCII: ESC HT a 

Dezimal: 27,9,a 

Ein horizontaler Tabulator wird an der Position a gesetzt. 


Automatischer Wagenrücklauf (carriage return): 

ASCII: ESC ? 

Dezimal: 27,63 

Automatischer Wagenrücklauf aus: 

ASCII: ESC ! 

Dezimal: 27,33 

Rückwärtsdruck ein: 

ASCII: ESC 6 

Dezimal: 27,54 

Vorwärtsdruck ein: 

ASCII: ESC 5 

Dezimal: 27,53 

Zeilenvorschub setzen: 

ASCII: ESC RS a 

Dezimal: 27,30,a 

Der Zeilenvorschub wird auf a-1 gesetzt, a entspricht Einheiten 
von 1/48 inch. 
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Absoluter Vertikaltabulator: 

ASCII: ESC VT a 

Dezimal: 27,1 l,a 

Ein absoluter Tabulator wird auf die Zeile a gesetzt. 


Halber Zeilenvorschub: 
ASCII: ESC U 

Dezimal: 27,85 


Halber Zeilenvorschub zurück: 
ASCII: ESC D 

Dezimal: 27,68 


Zeilenvorschub zurück: 
ASCII: ESC LF 

Dezimal: 27,10 


Unterstreichen ein: 
ASCII: ESC E 

Dezimal: 27,69 


Unterstreichen aus: 
ASCII: ESC R 

Dezimal: 27,82 


Font in Slot 2 aktivieren (Fett): 
ASCII: ESC O 

Dezimal: 27,79 


Font in Slot 3 aktivieren (Kursiv): 
ASCII: ESC W 

Dezimal: 27,87 


Grundzeichensatz aktivieren (in der Regel in Slot 1): 
ASCII: ESC & 

Dezimal: 27,38 
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Dieses Kommando muß verwendet werden, um von Slot 2 oder 3 
zurückzuschalten. 


Font in Slot a als Grundfont installieren: 

ASCII: ESC SO a 

Dezimal: 27,14,a 

Ein in einem der Slots 1-8 installierter Zeichensatz wird zum 
Grundfont. Der alte Grundfont kann nur durch erneutes Aus¬ 
führen des Kommandos wieder eingestellt werden, a ist ein 
Dezimalwert der ASCII-Zeichen 1-8. 


Rechtbündig drucken: 
ASCII: ESC M 

Dezimal: 27,77 


Text zentrieren: 
ASCII: ESC = 

Dezimal: 27,61 


Druckkopf 1/120 inch zurück: 
ASCII: ESC BS 

Dezimal: 27,8 


Seitendruck gerade, ungerade bzw. alle: 

ASCII: ESC # a 

Dezimal: 27,35,a 

a kann sein: A (alle), E (gerade) oder O (ungerade Seiten) 


Zurücksetzen aller Textverarbeitungseinstellungen: 
ASCII: ESC X 

Dezimal: 27,88 


Reset Diablo 630: 
ASCII: ESC CR P 

Dezimal: 27,13,80 
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Es gibt noch einige wenige Grafikkommandos, die unterstützt 
werden. Damit läßt sich allerdings nur recht wenig anfangen, 
beispielsweise ein Rechteck zeichnen etc. Zum Grafikdruck ist 
der EPSON-FX-Emulator (siehe weiter unten) allerdings erheb¬ 
lich besser geeignet. 

Grafik einschalten: 

ASCII: ESC 3 

Dezimal: 27,51 


Grafik ausschalten 
ASCII: ESC 4 

Dezimal: 27,52 


Grafikzeichen drucken: 

ASCII: ES " aaa SP 

Dezimal: 27,34,aaa,32 

Hier ist "aaa" der dezimale ASCII-Wert eines Grafikzeichens. 


Kasten zeichnen: 

ASCII: ESC DC2 B wwww,xxxx,yyyy,zzzz,tttt SP 

Dezimal: 27,18,66,wwww,xxxx,yyyy,zzzz,tttt,32 

wwww linke obere Ecke, horizontale Koordinate 

xxxx linke obere Ecke, vertikale Koordinate 

yyyy Breite des Kastens 

zzzz Höhe des Kastens 

tttt Strichdicke 

yyyy, zzzz und tttt werden in Punkten angegeben (1/300 inch), 
entsprechend der maximalen Auflösung des SLM 804 

Wichtig: Wenn Sie Fonts mit Setup630 installieren, kann Ihre 

Textverarbeitung das Aussehen dieser Zeichensätze 
natürlich nicht auf den Bildschirm bringen. Über das 
Aussehen informiert lediglich der Menüpunkt "Install 
Style" im "Style"-Rollmenü. 



188 


Das große Mega-ST-Buch 


# Druckerdatei zur Dlablo-Emulatlon für IST Word Plus 


5LM 804 ft Oruckerbezelchnung 

ft 5 Grundparameter! Nicht aktiv bei Dlablo-Emulatlon 
ft 

# li Druckertyp, 0*Matrlx, l=Typenrad 
ft 2> Zeichenbreite 

ft 3« Zeichenhöhe 

# 4i Druckkopfposition nach Seltenvorschub 
ft 5: Doppeldruck 

# 6i Pause zwischen Druckselten (Einzelblattmodus) 

# 

0, 0, 0. 0, 0, 0 # Alle Parameter 0 bei SLM804 


ft Ab hier Steuersequenzen 

« 

Diablo 630/SLM804 mit Emulation 

1. D, A 

I 




ft 

Llnefeed mit Return , 

ft 2 





ft 

Vorwärts drucken 

# 3 





ft 

Zurück drucken 

ft 5 





ft 

Absoluter horizontaltabulator 

6, 1B, 

4F 




ft 

Fettschrift normal ein 

7. 18, 

26 




ft 

Fettschrift normal aus 

8, 1B, 

4F 




ft 

Fettschrift NLQ ein 

9. 1B. 

26 




ft 

Fettschrift NLQ aus 

A. 1B, 

57 




ft 

Kursiv normal ein 

B, 1B, 

26 




ft 

Kursiv normal aus 

C, 1B, 

57 




ft 

Kursiv NLQ ein 

D, 1B, 

26 




ft 

Kursiv NLQ aus 

E, 1B, 

25 




ft 

Magere Schrift normal ein 

F, 1B, 

26 




ft 

Magere Schrift normal aus 

10, 1B, 

25 




ft 

Mager NLQ ein 

11. 1B, 

26 




ft 

Mager NLQ aus 

12, 1B, 

0E, 

34 



ft 

Hochgestellt normal ein 

13, 1B, 

0E, 

31 



ft 

Hochgestellt normal aus 

14, 1B, 

0E, 

34 



ft 

Hochgestellt NLQ ein 

15, 1B, 

0E, 

31 



ft 

Hochgestellt NLQ aus 

16, 1B, 

55, 

1B, 

0E, 

34 

ft 

Tiefsetzen normal ein 

17, 1B, 

0E, 

31. 

1B, 

44 

ft 

Tiefsetzen normal aus 

18. 1B, 

55, 

1B. 

0E, 

34 

ft 

Tiefsetzen NLQ ein 

19, 1B, 

0E, 

31. 

1B. 

44 

ft 

Tiefsetzen NLQ aus 

1A. 1B. 

45 




ft 

Unterstreichen normal ein 

1B, 1B. 

52 




ft 

Unterstreichen normal aus 

IC, 1B. 

45 




ft 

Unterstreichen NLQ ein 

ID, 1B, 

52 




ft 

Unterstreichen NLQ aus 

IE, C 





ft 

Seitenvorschub 

1F. 1B, 

0D, 

50 



ft 

Horizontale Initialisierung 

21, 1B. 

0D, 

50 



ft 

Drucker Reset Diablo 630 

0 





ft 

NULL-Byte zum Abschlup der Steuersequenzen 


Bild 55: 


Eine Druckerdatei für die Diablo 630-Emulation mit IST Word Plus 
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\ xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xxx xxxxxxxxx xx x xxx xx xxx xxxxxxxxxxxxxx 

\X DIABLO 630 Typenrad für 5LM804 X 

\ xxxxxxx x xxxxxxxxxxxxxxxxxxxxxxx x xxxxxxxxxxxxxxxx x x x xxxxxxxxxxxxxxxx 


\0 

27.13,80 

X DIABLO 630 Reset 

\l+ 

27,79 

X fett ein 

\1- 

27,38 

X fett aus (zurückschalten auf Grundfont) 

\2+ 

27,87 

X kursiv ein 

\2- 

27,38 

X kursiv aus 

\3* 

27,69 

X unterstreichen ein 

\3- 

27,82 

X unterstreichen aus 

\4* 

27,14,52 

X mager ein (Font in Slot 4 wird Grundfont) 

\4- 

27,14,49 

X mager aus (Grundfont zurück auf Slot 1) 

\5 + 

27,68,27,14,53 

X hochsetzen ein 

\5- 

27,14,49,27,85 

X hochsetzen aus 

\6+ 

27,85,27.14,53 

X tiefsetzen ein 

\6- 

27.14,49,27,68 

X tiefsetzen aus 

\A 

27,14,49 

X Grundfont mit 10 CPI in Slot 1 

\B 

27,14,54 

X Grundfont mit 12 CPI in Slot 6 

\C 

27,14,53 

X Listing-Font in Slot 5 ist Grundfont 

\E 


X 

\a 

10 

x 10 cpi 

\b 

12 

X 12 cpi 

\c 

15 

X 15 cpi 

\e 

5 

X 5 cpi Proportional 

\n 

13,10 

X neue zeile (CR/LF) 

\JJ 

27,77 

X Blocksatz 

\X1.0 

27,30,9 

X 1 zeilig 

\X1.5 

27.30,13 

X 1.5 zeilig 

\X2.0 

27,30,17 

X 2 zeilig 

Bild 56: 

Druckerdatei 

zur Diablo-Emulation mit BECKERtext ST 2.0 
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Setup630.RSC 

Diesees Resource-File enthält wichtige GEM-Daten für das 
SETUP.PRG. Es muß vorhanden sein, wenn Setup630.PRG ge¬ 
startet wird. 


Setup630.ACC 

Hier handelt es sich um ein Desk-Accessory, das dem Accessory 
"Drucker Anpassung" entspricht, also Einstellungen wie 
Magazineinzug oder Manuell bzw. Einzelblatt ermöglicht. Es 
muß sich in dem Rootdirectory von Partition C der Festplatte 
bzw. auf der Bootdiskette befinden, um geladen zu werden. Das 
Accessory erlaubt überdies den Ausdruck einer Testseite (mit 
Angabe der Version des Druckertreibers etc.), ein Reset des 
Druckers ist ebenso möglich wie eine Anzeige des Drucker- 
Status. Die Wirkung dieses Accessory ist schon dadurch zu er¬ 
kennen, daß die Busy-Leuchtdiode des SLMC804 aufleuchtet, 
sobald es aktiviert ist - eine Hardcopy des Bildschirms ist 
während der Parameterübergabe nicht möglich. 


Sdump.PRG 

Dieses Programm leitet die Hardcopy-Funktion, erzeugt durch 
die Tastenkombination <Alternate> + <Help>, auf den DMA- 
Port um und damit an den SLM804. Man kann das Programm 
entweder durch den üblichen Doppelklick starten, oder man 
bindet es in den AUTO-Ordner ein. Dann steht die Hardcopy- 
Funktion nach jedem Bootvorgang automatisch zur Verfügung. 
Mit Sdump.PRG lassen sich in Ermangelung vorhandener Trei¬ 
ber sehr schön die Grafiken eines Zeichenprogramms ausgeben. 
Dabei sind "Stufen" in den Grafiken natürlich zu sehen - der 
Ausdruck entspricht exakt dem Anblick auf dem Bildschirm. 
Mit einem geeigneten Treiber würde der SLM804 runde "Ecken" 
auch wirklich rund, also ohne die "Treppchen" darstellen. 



Die Hardware 


191 


IstJPRNT.DOT und SLM804.HEX 

Dies sind nichtinstallierte Druckertreiber-Dateien für die Text¬ 
programme Ist Word (.DOT) und Ist Word Plus (.HEX). Sie 
können wie üblich in diesen Textverarbeitungen installiert wer¬ 
den. Veränderungen ergeben allerdings meist nur mangelhafte 
Ergebnisse. Schriftattribute sollten nur mit SETUP630 verändert 
werden. Steuerzeichen werden offenbar falsch oder gar nicht 
interpretiert. 


Fonts 

Auf der Atari-Diskette befinden sich noch weitere Dateien mit 
der Extension .FNT. Hierbei handelt es sich um die Zeichensätze 
für den Diablo-Emulator. Mit Install Fonts können diese instal¬ 
liert werden. 


Test.PRG 

Dieses kleine Programm funktioniert sofort nach dem Installieren 
und Inbetriebnehmen des Druckers. Klicken Sie einfach auf das 
Programm-Icon. Es veranlaßt den SLM804 zum Ausdrucken 
eines Testmusters. Mehr als eine reine Funktionskontrolle ist mit 
diesem Programm nicht möglich. 


Erste Lebenszeichen 

Der Drucker ist nach dem Installieren bzw. Starten der oben ge¬ 
nannten Programme betriebsbereit. Beachten Sie in jedem Falle 
die Reihenfolge beim Einschalten: Drucker einschalten und 
warten, bis die grüne Lampe an der Frontseite aufleuchtet. 
Danach Festplatte und sonstige Peripherie und ganz zuletzt den 
Mega ST einschalten. 

Wenn Sie jetzt auf Test.PRG klicken, müßte der SLM804 eine 
Testseite ausgeben. Haben Sie Sdump.PRG im AUTO-Ordner 
eingerichtet, können Sie jetzt eine Hardcopy des Bildschirms 
ausgeben lassen - betätigen Sie <AlternatexHelp>. Sollte der 
Drucker das Papier "verschmieren", so verstellen Sie den Knopf 
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Density, bis das Druckbild überzeugend ist. Und nun können 
Sie, wenn Sie mit Ist Word und Typenrad-Emulation nicht 
zufrieden sind, auf die Suche nach Programmen mit SLM804- 
Treiber gehen. 


Ein Epson-Emulator für den SLM 804 

Der Mega ST ist, wie auch seine Vorgänger, hervorragend für 
die Arbeit mit einem Drucker des Herstellers Epson bzw. dazu 
kompatiblen Geräten geeignet. Darauf weist schon die Hard¬ 
copy-Funktion hin, die für einen solchen Drucker eingerichtet 
ist. Die Zeichensätze entsprechen zu einem großen Teil dem so¬ 
genannten IBM-Zeichensatz - auch damit ist der Epson-Drucker 
vertraut. Als Urtyp aller Epson- bzw. kompatiblen Geräte gilt 
der FX80 bzw. dessen Nachfolger FX85 oder FX800. Andere 
Drucker, wie die der Epson-LQ- oder LX-Reihe, verfügen 
meist auch über die Funktionen dieser Geräte. 

Wegen der genannten Ausrichtung auf diese Drucker bzw. deren 
weiter Verbreitung statteten alle Softwarehersteller ihre Produkte 
mit Druckertreibern für Epson-Drucker aus - meist für das 
Modell FX80 bzw. dessen Nachfolger. Da auch viele andere 
Druckerhersteller ihre Geräte "Epson-kompatibel" machten, 
brauchen die Anwender keine Sorge wegen eines fehlenden 
Treibers zu haben. Ganz anders sieht das auf den ersten Blick 
bei den Besitzern eines SLM 804 aus. Doch Hilfe ist auf dem 
Wege! Denn alle Programme mit Epson-Treibern können auch 
mit dem Atari-Laserdrucker ausdrucken. Wie funktioniert das? 

Atari stellt den Käufern eines SLM 804 einen sogenannten FX- 
Emulator zur Verfügung. Dieses Programm emuliert, ähnlich 
dem Diablo-Emulator der SLM 804-Diskette, einen solchen 
Drucker - der Atari SLM 804 kann nach dem Ausführen des 
Programms Befehle verstehen, die für den FX80 oder andere 
Epson-Drucker gedacht sind. Der Emulator wird in den AUTO- 
Ordner der Bootdiskette bzw. Partition C der Festplatte kopiert 
und startet so automatisch beim Einschalten des Computers. Da¬ 
nach startet man seine Anwendung unter Einsatz eines vor¬ 
handenen Treibers für den FX oder andere Epson-Drucker. 
Beispiel: Bei der Textverarbeitung BECKERText ST wird nach 
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dem Starten des Emulators das Textprogramm gestartet und an¬ 
schließend als Drucker ein IBM-Drucker bzw. die Epson-An- 
passung ausgewählt. Schon läßt sich alles mit dem SLM 804 zu 
Papier bringen. Und damit nicht genug - per Dialogbox lassen 
sich auch die speziellen Möglichkeiten des Laserdruckers nutzen. 
Beispielsweise werden Stufen "geglättet", und die Auswahl ver¬ 
schiedener Fonts ist ebenfalls möglich. Der SLM 804 "ist" jetzt 
zwar FX80, das Druckbild jedoch von erheblich höherer Quali¬ 
tät. Das gilt auch für die Hardcopy-Funktion über die Tasten 
"Alternate/Help"). So sind beispielsweise keine Einzelpunkte wie 
bei der Matrix-Technik des FX zu erkennen, Schwarztöne sind 
wirklich als schwarze Flächen dargestellt usw. Der FX-Emulator, 
der ehemals als Produkt des Softwarehauses DMC mit der Be¬ 
zeichnung "Laserbrain" das Licht der Welt erblickte, dürfte den 
meisten Anwendern mit Atari-Laser wie gerufen kommen. 
Übrigens sollten Sie immer eine Anpassung für IBM-Kompa- 
tible-Drucker benutzen, wenn Sie Bilder ausdrucken wollen, da 
der FX-Emulator sonst immer einen kleinen Zwischenraum 
zwischen den einzelnen Druckzeilen erzeugt und damit das Bild 
auseinander zieht. 

Das Beste ganz zum Schluß: Der FX-Emulator kostet nichts - 
oder fast nichts. Aufzuwenden sind lediglich die Energie für 
einen Gang zum Atari-Händler sowie eine Leerdiskette. Beim 
Händler kann das Programm nämlich kostenlos kopiert werden. 
Wieso Atari das nützliche Utensil z.Zt. nicht gleich auf die dem 
Laser beiliegende Diskette kopiert - diese Frage wird wohl kaum 
jemand beantworten können. 
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DESK DATEI INDEX EXTRAS 


graphikfähiger Druckerfreiber für den ATARI SLM804 
gesamte Puffergröße: 614400 
davon zur Zeit noch frei: 249978 
Größe der momentanen Seite: 0 
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|2| schmal 
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Font Nummer 
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Font/Konfiguration laden 


Konfiguration speichern 


Font löschen 


Seite löschen 


Seife ausdrucken 


Laser AUS 
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Bild 57 


4.2 Die innere Hardware des Mega ST 

Die Hardware des Mega ST ist aufwärtskompatibel zu der der 
bisherigen STs. Der wesentliche Unterschied zu den bisherigen 
Geräten ist die üppige Ausstattung mit RAM. Statt bisher ein 
halbes oder ein Megabyte, stehen dem Anwender jetzt zwei oder 
gar vier Megabyte zur Verfügung. Des weiteren hat der Mega 
ST einen eingebauten Blitter, der die Leistungsfähigkeit im Be¬ 
reich der Grafik erheblich steigert. Da der Mega ST dem An¬ 
spruch auf professionelle Anwendungen gerecht werden will, 
wurde er mit einer batteriegepufferten Hardware-Uhr ausge¬ 
rüstet, die die aktuelle Uhrzeit auch beibehält, wenn der 
Rechner ausgeschaltet ist. 
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Das Herz des Rechners ist der Motorola 16-Bit-Mikroprozessor 
MC68000. Er erlaubt ein komfortables Programmieren sowohl in 
Assembler als auch in jeder beliebigen Hochsprache. Hier bietet 
sich ’C’ als Haussprache des 68000 besonders an. Der 68000 
verfügt intern über eine komplette 32-Bit-Struktur. Extern hat 
er einen 16-Bit Datenbus sowie einen (nicht gemultiplexten) 24- 
Bit-Adreßbus. Damit lassen sich 16 Megabyte linear adressieren. 
Eine umständliche, den Programmierer ein engende Segmentie¬ 
rung wie bei den Intel-Prozessoren gibt es hier nicht. Durch 8 
universelle 32-Bit-Datenregister, 9 32-Bit-Adreßregister und 
den orthogonalen Befehlssatz ist die Assemblersprache effizient 
und leicht erlernbar. 


4.2.1 Der Speicher des Mega ST 

Im Atari Mega ST sind 2 bzw. 4 Megabyte RAM-Speicher ein¬ 
gebaut. Es handelt sich dabei um 16 oder 32 1-MB-DRAM- 
Chips vom Typ Toshiba 511000. Mit Hilfe der MMU (Memory 
Management Unit) belegt der Speicher den linearen Adreßraum 
von 0-2 MB (0 - $200000) bzw. von 0-4 MByte (0 - 
$400000). Da das Betriebssystem des Atari ST in der Lage ist, 
diesen Speicher zu verwalten, steht er dem Programmierer un¬ 
eingeschränkt zur Verfügung. 


4.2.2 Die Schnittstellen des Mega ST 

An Verbindungen zur Außenwelt stehen dem Mega ST die 
gleichen Möglichkeiten wie den früheren ST-Modellen zur 
Verfügung. Dazu gehören neben dem Monitoranschluß (hoch¬ 
auflösender Monochrom-Monitor und RGB-Farbmonitor) als 
erstes die Tastatur mit einem eigenen Prozessor (Intelligent Key¬ 
board, IKBD), über die auch Maus und Joysticks bedient wer¬ 
den, ein 8-Bit-Parallel-Port (Centronics), vorzugsweise zum 
Anschluß eines Druckers, eine serielle Schnittstelle, MIDI, ein 
Anschluß für ein weiteres Diskettenlaufwerk (neben dem bereits 
eingebauten), ein ROM-Modul-Schacht, über den bis zu 128 
KByte ROM angeschlossen werden können, sowie eine univer¬ 
selle DMA-Schnittstelle, über die z.B. Harddisk und Laser- 
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drucker angeschlossen sind. Diese Schnittstelle ist in der Lage, 
Daten mit über 1 MByte pro Sekunde mit der Peripherie auszu¬ 
tauschen. 


4.2.3 Die Custom-Chips des ST 

Um die enorme Leistungsfähigkeit des ST zu erreichen, enthält 
er mehrere speziell entwickelte Custom-Chips, die eine Vielzahl 
von Funktionen enthalten. 

Der wichtigste ist sicherlich der GLUE. Er verfügt über sämt¬ 
liche Adreß-, Daten- und Steuerleitungen. Dieses 68polige IC 
erzeugt z.B. die Interrupt-Signale, generiert einen Buserror, falls 
auf unzulässige oder geschützte Bereiche zugegriffen wird, er¬ 
zeugt die Taktfrequenzen für Sound-Chip und ACIAs sowie für 
den Video-Betrieb. 

Die MMU, ebenfalls im 68poligen Gehäuse, ist für den Betrieb 
und Refresh der dynamischen RAMs zuständig. Dazu gehört das 
Multiplexen der Adreßleitungen und die Erzeugung der zuge¬ 
hörigen RAS- und CAS-Signale. Weiterhin unterstützt sie den 
Shifter bei der Adressierung des RAMs beim Aufbau eines Bil¬ 
des. Auch beim DMA-Berieb generiert die MMU die aktuellen 
RAM-Adressen. 

Der Video-Shifter im 40poligen DIL-Gehäuse hat die Aufgabe, 
aus der im Video-RAM enthaltenen Information ein Videosignal 
zum Betrieb eines Monitors zu generieren. Wenn der ST in 
mittlerer oder niedriger Auflösung betrieben wird, liefert der 
Shifter auch die Farbinformation. 

Der DMA-Controller im 40poligen DIL-Gehäuse schließlich 
entlastet den Prozessor bei den Datenübertragung von und zur 
Floppy sowie zur Harddisk. Er erlaubt eine Übertragungsrate 
von über 1 MByte pro Sekunde und schlägt dabei alle anderen 
Schnittstellen in der Geschwindigkeit um Längen. Ihm ist es 
auch zu verdanken, daß der Laserdrucker auf eine komplette 
Seite nicht länger warten muß, als er benötigt, um die Seite 
auszudrucken. 
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Als weitere Neuerung gegenüber den bisherigen STs hat der 
Mega ST einen 64poligen Slot, an dem der komplette Prozessor¬ 
bus zur Verfügung steht. Dieser Slot ist allerdings nur zugäng¬ 
lich, wenn man das Gehäuse des Rechners öffnet. Da an ihm 
alle Signale des 68000-Prozessors zur Verfügung stehen, eignet 
er sich hervorragend zum Anschluß von Systemerweiterungen. 

Die Pinbelegung dieses Slots ist bis auf drei Signale identisch mit 
der Anschlußbelegung des 68000-Prozessors, beachten Sie jedoch 
die anders verlaufende Numerierung der Pins beim 68000. Sie ist 
in der folgenden Tabelle wiedergegeben. Der Slot hat auf der 
Platine die Bezeichnung J15; die ungeraden Pin-Nummern 
zeigen dabei zur Frontseite des Gerätes. 


D4 

1 

2 

D5 

D3 

3 

4 

D6 

D2 

5 

6 

D7 

Dl 

7 

8 

D8 

DO 

9 

10 

D9 

AS 

11 

12 

D10 

UDS 

13 

14 

Dil 

LDS 

15 

16 

D12 

R/W 

17 

18 

D13 

DTACK 

19 

20 

D14 

BG 

21 

22 

D15 

BGACK 

23 

24 

GND 

BR 

25 

26 

A23 

GND 

27 

28 

A22 

CLK 

29 

30 

A21 

GND 

31 

32 

GND 

HALT 

33 

34 

A20 

RESET 

35 

36 

A19 

VMA 

37 

38 

A18 

E 

39 

40 

A17 

VPA 

41 

42 

A16 

BERR 

43 

44 

A15 

NMI 

45 

46 

A14 

INT5 

47 

48 

A13 

INT3 

49 

50 

A12 

FC2 

51 

52 

All 

FC1 

53 

54 

A10 

FCO 

55 

56 

A9 

AI 

57 

58 

A8 
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A2 57 58 A7 
A3 57 58 A6 
A4 57 58 A5 

Der einzige Unterschied in den Signalen zu denen des 68000 be¬ 
trifft die Leitungen NMI, INT5 und INT3. Der Prozessor hat 
dort die Signale IPLO, IPL1 und IPL2, mit denen Interrupts in 7 
verschiedenen Ebenen erzeugt werden können. Da die Ebenen 2 
(Horizontal Blank), 4 (Vertical Blank) und 6 (alle anderen 
Interrupts über MFP 68901) von der vorhandenen Hardware 
bereits genutzt sind, werden am Expansion-Slot bereits die 
decodierten Signale zum Auslösen eines Interrupts der Ebene 7 
(NMI, nicht maskierbarer Interrupt) sowie der Ebenen 5 und 3 
zur Verfügung gestellt. Eine ausführliche Beschreibung der 
Interrupts sowie alle Leitungen des Prozessors finden Sie in 
’ATARI ST Intern’. 

Die Signale des Expansion-Slots sind direkt (ungepuffert) mit 
den entsprechenden Leitungen des MC 68000 verbunden. Von 
der Software her stehen dem Anwender an diesem Slot die 
Adreßbereiche SC00000 bis SCFFFFF sowie ein 32 KByte 
großer I/O-Bereich von SFF0000 bis SFF7FFF sowie noch 510 
Bytes von $FFFE00 bis SFFFFFD zur Verfügung. 

Soll über den Expansion-Slot eine RAM-Erweiterung ange¬ 
schlossen werden, so kann dieses RAM nicht als Video-RAM 
genutzt werden, auch DMA ist damit nicht möglich. Das 
Betriebssystem (GEMDOS) kann dort vorhandenes RAM nicht 
verwalten. 

Zur Stromversorgung einer am Expansion-Slot angeschlossenen 
Karte dient der Steckverbinder J18 zwischen Netzteil und einge¬ 
bauter Floppy. An ihm stehen +5 Volt, belastbar mit 750 mA 
sowie +12 Volt mit maximal 500 mA zur Verfügung. 

1 +5 v 

2 +5 V 

3 Hasse 

4 Masse 

5 Masse 

6 +12 V 
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Zum Betrieb am Expansion-Slot anbieten würde sich der 
Arithmetik-Coprozessor MC 68881 von Motorola. Atari hat 
bereits einen Adreßbereich für diesen schnellen Rechner reser¬ 
viert, er ist in der Abbildung mit der Aufteilung des I/O-Be¬ 
reichs schon enthalten. Was kann man mit so einem Coprozessor 
tun? So ein Chip kann dem Rechner bei rechenintensiven Auf¬ 
gaben ganz schön auf die Sprünge helfen. Besonders, wenn viel 
Fließkommaarithmetik benutzt und hohe Genauigkeit verlangt 
wird, z.B. 16 signifikante Stellen, kann der MC 68881 die Aus¬ 
führung schon um den Faktor 10 beschleunigen. Sind sehr viele 
trigonometrische Berechnungen durchzuführen (z.B. Sinus und 
Cosinus), kann die Geschwindigkeitssteigerung gar das 250fache 
betragen. Gegen einen solchen Coprozessor spricht eigentlich nur 
der Preis von zur Zeit ca. 350 DM und daß nur solche Pro¬ 
gramme von seinen Fähigkeiten profitieren können, die mit 
seinem Vorhandensein rechnen. 


4.2.4 Der Blitter 

Der Blitter im Mega ST stellt eine hardwaremäßige Implemen¬ 
tierung des BITBLT-Algorithmus dar. BITBLT ist eine Abkür¬ 
zung für Bit Block Transfer und stellt eine der wichtigsten 
grafischen Grundfunktionen dar. Beim Bit Block Transfer wird 
ein rechteckiger Ausschnitt aus einem zweidimensionalen 
Grafikbereich an eine andere Stelle verschoben. Dabei können 
während des Verschiebens vielfältige logische Verknüpfungen 
zwischen dem Quellbereich und dem Zielbreich vorgenommen 
werden. Weiterhin kann noch ein Raster über diesen Bereich 
gelegt werden. 

Aus dieser Beschreibung können Sie schon entnehmen, daß das 
Ganze relativ aufwendig und komplex ist. Auf den bisherigen 
STs (wenn Sie wollen aber auch auf Ihrem Mega ST) wurde 
diese Aufgabe per Software vom Prozessor erledigt; ein mehrere 
KByte langes Maschinenprogramm. Was die Sache relativ lang¬ 
sam machte, war die Tatsache, daß die Grafik bitorientiert ist. 
Das bedeutet für das Programm viele Maskierungs- und 
Schiebeoperationen, da der 68000-Prozessor grundsätzlich nur 
byte- oder wortweise auf den Speicher zugreifen kann. Der 
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Blitter greift nun an zwei Stellen an. Zum ersten werden hier die 
Schiebe- und Maskierbefehle per Hardware erledigt, zum 
zweiten arbeitet der Blitter im DMA-Betrieb. Was bedeutet das? 
Damit wird ausgedrückt, daß der Blitter selbst auf den Speicher 
zugreifen kann, ohne den Prozessor dafür zu bemühen. Er liest 
also selbständig Daten aus dem Speicher, manipuliert sie ent¬ 
sprechend und schreibt das Ergebnis wieder an den Zielbereich. 
Der Prozessor wird nur noch zur Programmierung des Blitters 
benötigt, der daraufhin dem Blitter den Datenbus überläßt, bis 
dieser mit seiner Arbeit fertig ist. 



Bild 58: Blockdiagramm Blitter 


Das nebenstehende Blockdiagramm macht Ihnen die Arbeitsweise 
des Blitters hoffentlich etwas klarer. Der Bitter kann also einen 
Quell- und einen Zielbereich mit einander verknüpfen und das 
Ergebnis wieder im Zielbereich ablegen. Da auch der Blitter nur 
wortweise auf den Speicher des ST zugreifen kann, die Grafik 
aber bitorientiert ist, werden von der Quelle jeweils zwei Worte 
gelesen und aus diesen mittels eines Shifters die 16 Bits isoliert, 
damit Quelle und Ziel aufeinander ’einrasten’. Dieses Quellwort 
kann noch mit einem Halbton-Raster maskiert werden, um z.B. 
eine Rasterung zu erhalten, wie Sie sie z.B. als Desktop-Hinter- 
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grund sehen. Das Ergebnis dieser Operation wird nun mit dem 
Zielwort logisch verknüpft. Dazu stehen insgesamt 16 ver¬ 
schiedene logische Operationen zur Verfügung, die Sie im 
Kapitel über die Programmierung des Blitters näher beschrieben 
finden. Das Ergebnis könnte jetzt zurück an das Ziel geschrie¬ 
ben werden. Beim ersten und beim letzten Wort jeder Zeile 
könnten jedoch, bedingt durch den wortweisen Zugriff auf die 
Daten, Bits verändert werden, die eigentlich gar nicht gemeint 
sind. Um dies zu verhindern, ist die Endmaske da. Damit ist es 
möglich, im ersten Wort überflüssige Bits auf der linken Seite 
und im letzten Wort auf der rechten Seite zu maskieren. 

Wenn Sie jetzt immer noch nicht genau wissen, wie der Blitter 
funktioniert, dann schauen Sie sich doch im nächsten Kapitel die 
Beispiele zur Programmierung an. 


4.2.5 Die Register der Peripheriebausteine und der Custom- 
Chips 

In diesem Kapitel wollen wir kurz auf die Register der I/O- 
Bausteine des Atari Mega ST eingehen. Dabei können im 
Rahmen dieses Buches die einzelnen Register nur kurz ange¬ 
sprochen werden; lediglich dem Blitter werden wir uns etwas 
ausführlicher widmen, da er doch entscheidend zur Leistungs¬ 
fähigkeit des Mega ST beiträgt. Wer mehr über die Hardware 
seines Rechners wissen möchte, dem sei das Buch "Atari ST 
Intern", 3. Auflage 1987, empfohlen, in dem auf Blitter und 
Hardware-Uhr ausführlich eingegangen wird. 

Die Hardware-Register des Atari ST befinden sich alle innerhalb 
der letzten 32 KByte des Adreßraums. Sie können deshalb vom 
68000-Prozessor mittels der Kurzadressierung angesprochen wer¬ 
den; das spart bei jedem Befehl 2 Byte. Da man bei unsachge¬ 
mäßer Programmierung dieser Register den Rechner leicht 
lahmlegen oder zum Absturz bringen kann, ist ein Zugriff nur 
im Supervisor-Modus des 68000 möglich. Versucht man im 
User-Modus darauf zuzugreifen, so ist ein Bus-Error die Folge 
(normalerweise werden daraufhin zwei "Bomben" ausgegeben, 
und das laufende Programm wird abgebrochen). 
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$FFFC20 
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$FFF040 

$FFFfl00 
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Bild 59: Die Aufteilung des I/O-Bereichs 
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In der folgenden Zusammenfassung sind die Hardware-Register 
nach aufsteigenden Adressen aufgeführt. 


Adresse 

Größe 

Zugriff 

Register 

SFF8201 

B 

R/W 

Speicherkonfiguration 

Video-Shifter 



SFF8201 

B 

R/W 

Video-RAM High-Byte 

SFF8203 

B 

R/W 

Video-RAM Low-Byte 

SFF8205 

B 

R 

Video-Adreß-Zähler High 

SFF8207 

B 

R 

Video-Adreß-Zähler Mid 

SFF8209 

B 

R 

Video-Adreß-Zähler Low 

SFF820A 

B 

R/W 

Sync-Modus 

SFF8240 

W 

R/W 

Farbpalette 0 

SFF8242 

W 

R/W 

Farbpalette 1 

SFF825C 

w 

R/W 

Farbpalette 14 

SFF825E 

w 

R/W 

Farbpalette 15 

SFF8260 

w 

R/W 

Video-Auflösung 


Floppy-Controller WD 1772 / DMA 


SFF8604 

W 

R/W 

FDC / DMA Sektor-Zähler 

SFF8606 

W 

R 

DMA-Status 

SFF8606 

W 

W 

DMA-Mode Register 

$FF8609 

B 

R/W 

DMA-Basis und -Zähler 

High 




SFF860B 

B 

R/W 

DMA-Basis und -Zähler Mid 

SFF860D 

B 

R/W 

DMA-Basis und -Zähler Low 

Soundchip YM 2149 



SFF8800 

B 

R 

Datenregister lesen 

SFF8800 

B 

W 

Datenregister selektieren 

SFF8802 

B 

W 

Datenregister schreiben 
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Blitter 


SFF8A00 

W 

R/W 

Halbton-Register 0 

SFF8A02 

W 

R/W 

Halbton-Register 1 

SFF8A1C 

w 

R/W 

Halbton-Register 14 

SFF8A1E 

w 

R/W 

Halbton-Register 15 

SFF8A20 

w 

R/W 

Source X Increment 

SFF8A22 

w 

R/W 

Source Y Increment 

SFF8A24 

L 

R/W 

Source Address 

SFF8A28 

w 

R/W 

Endmask 1 

SFF8A2A 

w 

R/W 

Endmask 2 

SFF8A2C 

w 

R/W 

Endmask 3 

SFF8A2E 

w 

R/W 

Destination X Increment 

SFF8A30 

w 

R/W 

Destination Y Increment 

SFF8A32 

L 

R/W 

Destination Address 

SFF8A36 

w 

R/W 

X-Count 

SFF8A38 

w 

R/W 

Y-Count 

SFF8A3A 

B 

R/W 

Halbton Operation 

SFF8A3B 

B 

R/W 

Logische Operation 

SFF8A3C 

B 

R/W 

Busy / Blitter Start 

SFF8A3D 

B 

R/W 

Skew 


MFP 68901, Multi Function Peripheral 


SFFFA01 

B 

R/W 

Parallelport, Datenregister 

SFFFA03 

B 

R/W 

Active Edge Register 

SFFFA05 

B 

R/W 

Parallelport, Richtungsregister 

SFFFA07 

B 

R/W 

Interrupt Enable Register A 

SFFFA09 

B 

R/W 

Interrupt Enable Register B 

SFFFAOB 

B 

R/W 

Interrupt Pending Register A 

SFFFAOD 

B 

R/W 

Interrupt Pending Register B 

SFFFAOF 

B 

R/W 

Interrupt In Service Re¬ 
gister A 

SFFFAll 

B 

R/W 

Interrupt In Service Re¬ 
gister B 

SFFFA13 

B 

R/W 

Interrupt Mask Register A 

SFFFA15 

B 

R/W 

Interrupt Mask Register B 

SFFFA17 

B 

R/W 

Vektor Register 

SFFFA19 

B 

R/W 

Timer A Control Register 

SFFFA1B 

B 

R/W 

Timer B Control Register 

SFFFA1D 

B 

R/W 

Timer C und D Control 
Register 

SFFFA1F 

B 

R/W 

Timer A Data Register 

SFFFA21 

B 

R/W 

Timer B Data Register 
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SFFFA23 

B 

R/W 

Timer C Data Register 

SFFFA25 

B 

R/W 

Timer D Data Register 

SFFFA27 

B 

R/W 

Synchronous Character Re¬ 
gister 

SFFFA29 

B 

R/W 

USART Control Register 

SFFFA2B 

B 

R/W 

Receiver Status-Register 

SFFFA2D 

B 

R/W 

Transmitter Status-Register 

SFFFA2F 

B 

R/W 

USART Data-Register 

Keyboard ACIA 6850 



SFFFC00 

B 

R 

Status-Register 

SFFFC00 

B 

W 

Control-Register 

SFFFC02 

B 

R 

Empfänger-Register 

SFFFC02 

B 

W 

Sende-Register 

MIDI ACIA 6850 



SFFFC04 

B 

R 

Status-Register 

SFFFC04 

B 

W 

Control Register 

SFFFC06 

B 

R 

Empfänger Register 

SFFFC06 

B 

W 

Sende Register 


Echtzeit-Uhr RP 5 C 15 


SFFFC21 

B 

R/W 

Sekunden Einer 

SFFFC23 

B 

R/W 

Sekunden Zehner 

SFFFC25 

B 

R/W 

Minuten Einer 

SFFFC27 

B 

R/W 

Minuten Zehner 

SFFFC29 

B 

R/W 

Stunden Einer 

SFFFC2B 

B 

R/W 

Stunden Zehner 

SFFFC2D 

B 

R/W 

Wochentag 

SFFFC2F 

B 

R/W 

Tag Einer 

SFFFC31 

B 

R/W 

Tag Zehner 

SFFFC33 

B 

R/W 

Monat Einer 

SFFFC35 

B 

R/W 

Monat Zehner 

SFFFC37 

B 

R/W 

Jahr Einer 

SFFFC39 

B 

R/W 

Jahr Zehner 

SFFFC3B 

B 

R/W 

Steuerregister 

SFFFC3D 

B 

R/W 

Steuerregister 

SFFFC3F 

B 

R/W 

Steuerregister 
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4.2.6 Die Programmierung des Blitters 

Im folgenden wollen wir auf die Programmierung des Blitters 
etwas näher eingehen. Ehe wir uns jedoch in die nicht ganz 
einfachen Einzelheiten stürzen, soll noch gesagt werden, daß 
eine solche direkte Programmierung des Blitters im Normalfall 
gar nicht erforderlich und auch nicht erwünscht ist. Das Be¬ 
triebssystem nimmt uns nämlich diese Arbeit ab. Dabei stellt es 
selbständig fest, ob ein Blitter in den Rechner eingebaut ist und 
ob dieser benutzt werden soll (Anklicken im Desktop unter 
"Optionen"). 

Der Nachteil von Programmen, die direkt auf den Blitter zu¬ 
greifen, ist der, daß sie eben nur auf Maschinen mit einge¬ 
bautem Blitter laufen. Doch nach soviel Vorwarnung sollen nun 
die jenigen unter Ihnen nicht zu kurz kommen, die wissen wol¬ 
len, wie es geht. 

Dazu haben wir ein relativ einfaches Beispiel heraus gesucht, 
nämlich das Scrollen des Bildschirms. Wenn man bei der Text¬ 
ausgabe in der letzten Zeile angekommen ist, soll der komplette 
Bildschirm um eine Zeile nach oben geschoben und die dann 
neu erscheinende letzte Zeile gelöscht werden. Damit nicht nur 
die Assembler-Programmierer etwas von diesem Beispiel haben, 
haben wir das Ganze in C geschrieben. Schauen Sie sich am 
besten das Programm einmal an; im Anschluß daran werden wir 
genau erklären, was dabei passiert. 

#include <stdio.h> 

#include <osbind.h> 

/* 

* evtl. <osbind.h> ergaenzen: 

★ 

* #define Blitmode(a) xbios(64,a) 

*/ 

#define UWORD unsigned int /* 16 bit unsigned */ 

#define UBYTE unsigned char /* 8 bit unsigned */ 

#define v bas ad 0x44eL /* adresse des Video-rams */ 
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typedef struct C 
UWORD halfton[16]; 
UWORD src_x_inc; 
UWORD src_y_inc; 
UWORD *src_addr; 
UWORD endmskl; 
UWORD endmsk2; 
UWORD endmsk3; 
UWORD dst_x_inc; 
UWORD dst_y_inc; 
UWORD *dst_addr; 
UWORD x_count; 
UWORD y_count; 
UBYTE hop; 

UBYTE op; 

UBYTE busy; 

UBYTE skew; 

> BUTTER; 


mainO 

i /* adresse des blitters */ 

register BUTTER *blitter = (BUTTER ^)0xFFFF8A00L; 
register int oldmode; 
register long savesp, dest; 

if (!((oldmode = Blitmode(-1)) & 0x02)) 

C 

printf("Sorry - kein Blitter eingebaut !\n"); 
exit(1); 

> 


Blitmode(oldmode | 1); /* blitter aktivieren */ 

savesp = Super(OL); /* in Supervisor schalten */ 

dest = *((long *)(v_bas_ad)); /* bildschirm adresse */ 

/* kompletten bildschirm eine zeile nach oben schieben */ 

blitter->src_x_inc = 2; 
blitter->src_y_inc = 0; 

/* quelle ist zweite zeile */ 
blitter->src_addr = (UWORD *)(dest + 16 * 80); 
blitter->endmsk1 = blitter->endmsk2 = blitter->endmsk3 = Oxffff; 


blitter->dst_x__inc = 2; 
blitter->dst_y_inc = 0; 
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blitter->dst_addr = (UWORD *)dest; /* ziel ist erste zeile */ 


blitter->x_count = 40; 

blitter->y_count = 16 * 25; 


blitter->hop = 2; 

blitter->op = 3; /* replace mode 


blitter->skew = 0; 


*/ 


blitter->busy = 0x80; /* blitter starten */ 

while (blitter->busy & 0x80) /* warten bis blitter fertig */ 


/* unterste biIdschirmzeile löschen */ 

blitter->src_x_inc = 2; 
blitter->src_y_inc = 0; 

blitter->src_addr = (UWORD *)(dest + 16 * 80 * 24); 

blitter->endmsk1 = blitter->endmsk2 = blitter->er»dmsk3 = Oxffff; 

blitter->dst_x_inc = 2; 
blitter->dst_y_inc = 0; 


blitter->dst_addr 

= (UWORD * 

)(dest + 16 * 80 * 24); 


blitter->x_count 

II 

o 



blitter*>y_count 

= 16; 

/* eine textzeile 

*/ 

blitter->hop 

= 2; 



blitter->op 

= 0; 

/* ziel mit nullen fuellen 

*/ 

blitter->skew 

= 0; 



blitter->busy = 0x80; 

/* blitter starten 

*/ 

while (blitter->busy & 0x80) 

i 

/* warten bis blitter fertig 

*/ 

Super(savesp); 


/* zurueck in usermode 

*/ 

B litmode(oldmode ) ; 


/* alter blitterstatus 

*/ 
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Um von C aus komfortabel auf den Blitter zugreifen zu können, 
wird er als Struktur definiert, und ein Zeiger auf diese Struktur 
wird mit der Adresse des Blitters versorgt. Falls kein Blitter ein¬ 
gebaut ist, wird das Programm sofort beendet. Dies kann mit der 
neuen XBIOS-Funktion Blitmode getestet werden. Da ab jetzt 
auf geschützte Bereiche zugegriffen werden muß, wird in den 
Supervisor-Modus geschaltet. Dann holen wir uns die 
Bildschirmadresse. Zunächst werden X- und Y-Increment sowie 
die Startadresse sowohl für Quelle als auch Ziel versorgt. Der X- 
Count wird auf 40 Worte gesetzt, während der Y-Count die 
Anzahl der Scanlinien angibt. Als logische Operation wählen wir 
den Replace-Modus. Dann wird der Blitter durch Setzen des 
Busy-Bits gestartet. In einer Schleife warten wir solange, bis das 
gelöschte Busy-Bit das Ende der Blitter-Operation anzeigt. 

Jetzt muß noch die letzte Zeile, deren Inhalt ja eine Zeile nach 
oben gerutscht ist, gelöscht werden. Auch dies kann der Blitter. 
Der Programmierung erfolgt analog zum ersten Teil, lediglich 
die logische Operation wird auf Null gesetzt. Dadurch werden in 
das Ziel lauter Nullbits kopiert. Anschließend wird in den User- 
Modus zurückgeschaltet und der alte Blitter-Modus wiederher¬ 
gestellt. 

In diesem Beispiel wurden die besonderen Fähigkeiten des Blit¬ 
ters noch nicht benutzt; er wird hier für ein einfaches Block¬ 
kopieren eingesetzt. Die Daten können hier wortweise (jeweils 
16 Bit auf einmal) kopiert werden. Dies läßt sich vom Prozessor 
auch softwaremäßig realisieren. Seine ganzen Möglichkeiten 
spielt der Blitter jedoch erst dann aus, wenn bitweise zugegrif¬ 
fen wird. Dies ist im allgemeinen immer dann der Fall, wenn 
beliebige Bildschirm- oder sogenannte Rasterbereiche kopiert 
oder manipuliert werden müssen. 

Verallgemeinert kann der Blitter Daten aus einem Quellbereich 
(Source) mit einem Zielbereich (Destination) verknüpfen und das 
Ergebnis wieder im Zielbereich ablegen. Die Verknüpfung der 
Daten kann dabei mit 16 verschiedenen logischen Operationen 
geschehen. Zusätzlich ist es noch möglich, die Daten mit einem 
Halbton-Raster logisch UND-zu-verknüpfen. Da der Blitter auf 
das RAM nur über den 16-Bit-Datenbus zugreifen kann, Quell 
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und Zielbereich jedoch Bit- bzw. Pixel-Orientiert sind, werden 
von der Quelle bei Bedarf 32 Bit gelesen (2 Worte) und diese 
dann vom eingebauten Shifter soweit verschoben, bis sie mit den 
entsprechenden Positionen im Zielbereich übereinstimmen. Jetzt 
kann das resultierende 16-Bit-Wort der Quelle mit dem Zielbe¬ 
reich entsprechend der gewählten logischen Operation verknüpft 
werden und das Ergebnis wieder im Zielbereich abgelegt wer¬ 
den. Folgende logische Operationen stehen zur Verfügung: 


(~s&~d) (~s&d) (s&~d) (s&d) 


0 0 0 0 
0 0 0 1 
0 0 10 
0 0 11 
0 10 0 
0 10 1 
0 110 
0 111 
1 0 0 0 
1 0 0 1 
1 0 10 
1 0 11 
1 10 0 
1 10 1 
1 110 
1 111 


Operation neues Ziel 

0 alles 0-Bits 

1 Quelle AND Ziel 

2 Quelle AND NOT Ziel 

3 Quelle 

4 NOT Quelle AND Ziel 

5 Ziel 

6 Quelle XOR Ziel 

7 Quelle OR Ziel 

8 NOT Quelle AND NOT Ziel 

9 NOT Quelle XOR Ziel 

10 NOT Ziel 

11 Quelle OR NOT Ziel 

12 NOT Quelle 

13 NOT Quelle OR Ziel 

14 NOT Quelle OR NOT Ziel 

15 alles 1-Bits 


’s’ bedeutet hier Source, und ’d’ steht für Destination. 

Außer der logischen Operation zur Verknüpfung von Ziel und 
Quelle läßt sich noch eine Halbton-Operation auswählen; im 
Blockdiagramm mit HOP bezeichnet. Dabei wird die Quelle mit 
einem Wert aus dem Halbton-RAM maskiert (logische UND- 
Verknüpfung), bevor das Ergebnis über die logische Operation 
wie beschrieben mit dem Ziel verknüpft wird. Dadurch läßt sich 
z.B. ein Raster über den Bereich legen. Da der Blitter insgesamt 
16 Halbton-Register enthält, die nacheinander in jeweils der 
nächsten Zeile benutzt werden, sind auch komplexere Raster 
möglich. 
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HOP Kombination 

0 alles 1 -Bits 

1 Halbton-RAM 

2 Source 

3 Source AND Halbton-RAM 

Die drei Endmasken sind schließlich für Anfang, Mitte und 
Ende einer Zeile zuständig. Mit ihrer Hilfe bleiben die Bits im 
Zielbereich unverändert, die zwar im entsprechenden 16-Bit- 
Wort enthalten sind, jedoch nicht verändert werden sollen. 

Dazu ein Beispiel. Nehmen Sie an, auf dem Bildschirm soll der 
Zielbereich aus den Pixeln 13 bis 44 einschließlich bestehen. 


0 1 
0123456789012345 

2 3 

6789012345678901 

4 

2345678901234567 

0000000000000111 

1111111111111111 

1111111111111000 


Die obersten beiden Zeilen enthalten die Bitnummern, wobei 
Wortgrenzen jeweils markiert sind. In der unteren Zeile stehen 
die drei Endmasken, die Bit 13 bis 44 einschließlich heraus¬ 
greifen. In die drei Blitter-Register sind also $0003, $FFFF und 
$FFF8 einzutragen. Werden mehr als drei Worte übertragen, so 
wird die Endmask 2 für alle zwischen dem ersten und letzten 
Wort liegende Bereiche angewandt. Sie hat dann immer den Wert 
$FFFF. 

Weiterhin ist es mit dem Blitter möglich, einen rechteckigen 
Ausschnitt aus einem (größeren) rechteckigen Bereich zu be¬ 
handeln. Dazu muß der Blitter wissen, wie viele Worte innerhalb 
einer Zeile zu behandeln sind. Nach jeder abgeschlossenen Zeile 
wird auf die laufende Adresse ein Offset addiert, um vom Ende 
der aktuellen Zeile zum Beginn der nächsten Zeile zu kommen. 
Dies wird als sogenanntes Y-Increment bezeichnet. Wie viele 
Worte in einer Zeile behandelt werden, bestimmt das X-Count- 
Register; die Anzahl der Zeilen steht im Y-Count-Register. 

Die Systemfonts im Atari ST sind übrigens auch als Rasterform 
organisiert. Deshalb eignet sich der Blitter auch hervorragend 
zur Textausgabe. Wir haben als nächstes Beipiel ein kleines Pro- 
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gramm geschrieben, das Zeichen aus dem Systemfont auf den 
Bildschirm "blittet", diesmal in Assembler. 


blitter equ $ff8a00 


blitter register offsets 


halftone 

equ 

0 

src_xinc 

equ 

$20 

src_yinc 

equ 

$22 

src_addr 

equ 

$24 

endmaskl 

equ 

$28 

endmask2 

equ 

$2a 

endmask3 

equ 

$2c 

dst_xinc 

equ 

$2e 

dst_yinc 

equ 

$30 

dst_addr 

equ 

$32 

x_count 

equ 

$36 

y_count 

equ 

$38 

hop 

equ 

$3a 

op 

equ 

$3b 

busy 

equ 

$3c 

skew 

equ 

$3d 

l i nea 

equ 

$a000 

v_bs_ad 

equ 

$44e 

* 

fontdat 

equ 

76 

formwidth 

equ 

80 

formheight equ 

82 

xbios 

equ 

14 

super 

equ 

38 

gemdos 

equ 

1 


pea test 
move #super,-(sp) 
trap tfxbios 
adciq.l #6,sp 

clr -(sp) 
trap #gemdos 

test dc.w linea 

move.l 8(a1),a1 


line a init 
biIdschirm adresse 

defines aus font header 


Programm im Supervisor 


Programm beenden 


font adresse holen 
zeiger auf 8*16 systemfont 
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nextchr: 


* 

* 

* 

* 

print 


no odd 


move.1 

v_bs_ad,aO 

adresse des bildschirm rams 

lea 

blitter,a2 

zeiger auf basisadresse blitter 

moveq 

#$41,d7 

mit •A' beginnen 

moveq 

#1 ,d6 

spalte 1 

moveq 

#10,d5 

zeile 10 

moveq 

#25,d4 

26 Zeichen ausgeben 

move 

d5,-(sp) 


move 

d6,-(sp) 

Parameter uebergeben 

move 

d7,-(sp) 


bsr 

print 

Zeichen ausgeben 

addq.1 

#6,sp 


addq 

#1 ,d7 

naechstes Zeichen 

addq 

#1 ,d6 

naechste spalte 

dbra 

d4,nextchr 


rts 




print(c 

. X, y) 

ein Zeichen ausgeben 

4(sp) c = Zeichen 

6(sp) x = spalte (0 - 79) 

8(sp) y = zeile (0 - 24) 

move 

formwidth(a1),src_yinc(a2) 'breite' des fonts 

moveq 

#0,d0 


move 

4(sp),d0 

Zeichen 

bclr 

#0,d0 

gerade adresse 

add.l 

fontdat(a1),d0 

plus Start fontdaten 

move.1 

d0,src_addr(a2) 

als source adresse 

move 

#$ff00,d0 

endmask fuer gerade spalte 

move 

6(sp),d1 

spalte 

bclr 

#0,d1 

ungerade ? 

beq 

no_odd 

nein 

move 

#$00ff,d0 

endmask fuer ungerade spalte 

move 

d0,endmask1(a2) 


move 

#80,dst_yinc(a2) 

bytes pro scan line 
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move 

#80*16,dO 

bytes pro zeile 


mulu 

8(sp),d0 

mal zeilen 


add 

dl ,d0 

plus spalte 


add. 1 

aO, dO 

plus bildschirm adresse 


move.1 

d0,dst_addr(a2) 

gleich destination adresse 


move 

#1,x_count(a2) 

nur ein wort kopieren 


move 

formheight(a1),y_count(a2) anzahl scan Linien 


move.b 

#2,hop(a2) 

halbton Operation 


move.b 

#3,op(a2) 

logische Operation 


moveq 

#0,d0 



move 

4(sp),d1 

Zeichen gerade ? 


move 

6(sp),d2 

spalte gerade ? 


eor 

d2,d1 



btst 

#0,d1 

beide gleich ? 


beq 

is_even 



moveq 

#8,d0 

Zeichen um 8 bit verschieben 


iseven move.b 

d0,skew(a2) 



move.b 

#$80,busy(a2) 

blitter starten ? 


wait btst 

#7,busy(a2) 

blitter fertig ? 


bne 

wait 

nein, warten 


rts 


ok ! 


4.2.7 Tastatur-Prozessor 



Der in der Tastatur des ST eingebaute Prozessor ist über 

ein 

integriertes PROM direkt 

programmiert. Beim Einschalten 

des 

Rechners beginnt er daher direkt mit seiner Arbeit. 


Diese Arbeit 

besteht aus 

der Beobachtung der Tastatur, 

der 

Maus, des evtl, angeschlossenen Joysticks sowie der seriellen 

Leitung, über welche die Kommunikation zwischen 

dem 

Rechner und der Tastatur bzw. dessen Prozessor stattfindet. 



Kommt über diese Leitung eine Datensequenz, so interpretiert 
der Tastatur-Prozessor diese als Kommandosequenz. Dabei sind 
eine ganze Reihe Kommandos möglich, mit denen man das Ver- 
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halten des Prozessors steuern oder Daten von ihm anfordern 
kann. Einige dieser Kommandos benötigen auch ein paar Para¬ 
meter, welche direkt hinterher gesendet werden. 

Um diese Kommandosequenz an die Tastatur senden zu können, 
besitzt das XBIOS des ST, ein Teil des Betriebssystems, eine 
spezielle Funktion. Diese Funktion mit der Nummer 25 trägt den 
Namen "ikbdws" und benötigt als Parameter die Adresse der zu 
sendenden Sequenz sowie deren Länge in Bytes-1. Wie dies pro¬ 
grammiert wird, sehen Sie gleich anhand eines Beispiels. 

Für dieses Beispiel müssen wir doppelt vorgreifen. Zum einen 
zeigt es Ihnen die Programmierung des XBIOS, was aber in 
einem späteren Kapitel noch eingehender besprochen wird. Zum 
anderen nehmen wir ein Tastatur-Kommando aus der Liste, 
welche erst im Anschluß an das Beispiel vorgestellt wird. 

Diese Funktion hat die Nummer 10. Sie dient sehr gut als Bei¬ 
spiel, da dieses Beispiel sogar einen gewissen Nutzen hat. Mit 
dieser Funktion können Sie nämlich die Maus umfunktionieren! 
Jede Mausbewegung wird dann als entsprechende Betätigung der 
Cursortasten gemeldet. Dies ist recht praktisch, wenn Sie mit 
einem Editor arbeiten, welcher unter TOS läuft (etwa der 
SEKA) und die Maus sowieso nicht braucht. 

Der Funktion werden zusätzlich zur Nummer (10) noch zwei 
weitere Bytes übergeben. Diese Bytes geben jeweils für die X- 
und Y-Bewegung an, wie weit die Maus bewegt werden muß, 
bis einmal die Cursortaste simuliert wird. 

Hier das Ganze als Maschinenprogramm: 


run: 


pea sequenz 

move #2,-(sp) 

move #25,-(sp) 

trap #14 

addq.l #8,sp 

rts 


;Zeiger auf Kommandosequenz 
;2+1 Bytes zu senden 
;Funktionsnummer 
;XBIOS ausfrufen 
;Stack korrigieren 
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Sequenz: 

; dc.b 8,8,8 

dc.b 10,5,5 

Die mittels des Semikolon als Kommentar definierte Zeile hat 
einen zusätzlichen Sinn: Wenn Sie das Semikolon entfernen und 
die Routine neu starten, hat die Maus wieder die gewohnte 
Funktion. Diese Umschaltung sollten Sie nicht vergessen, da das 
Desktop wenig mit wiederholten Cursortasten anfangen kann! 

Die gleiche Funktion nun aus einem GFA-BASIC-Programm 
heraus: 

A$=Chr$(10)+Chr$(5)+Chr$< 5) 

Void Xbios(25,2,L:Varptr(A$)> 

Procedure Maus 
A$=Chr$(8) 

Void Xbios(25,0,L:Varptr(A$)) 

Return 

Mit RUN können Sie die Umschaltung der Maus vornehmen. 
Um die Maus wieder als Maus zu verwenden, brauchen Sie 
lediglich @maus einzugeben. 

Übersicht der Tastaturprozessor-Kommandos (die Parameter 
stehen in der Klammer). 


7 (s.u.) 

Reaktion: Einstellung der Reaktion auf Drücken der 

Maustasten. Die Bits 0-2 des Parameterbytes 

bedeuten: 

Bit 0: Meldung der absoluten Mausposition 

beim Drücken einer Taste 

Bit 1: Meldung der absoluten Mausposition 

beim Loslassen einer Taste 

Bit 2: Meldung der Maustasten als normale 

Tasten 
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8 

(-) 

Reaktion: 

Ab sofort Meldung der relativen Mausposition 
(Normaleinstellung). 

9 

(maximal_X.W, maximaI_Y.W) 

Reaktion: 

Ab sofort Meldung der absoluten Mausposition. 

10 

(X-Takte.B, Y-Takte.B) 

Reaktion: 

Mausbewegung als Cursortastendruck melden (siehe 
Beispiel). 

11 

(X-Schwelle.B, Y-Schwelle.B) 

Reaktion: 

Verzögerung der Meldung von Mausbewegungen 
einstellen. 

12 

(X-Skala.B, Y-Skala.B) 

Reaktion: 

Skala für Mausposition einstellen. 

13 

(-) 

Reaktion: 

Abfrage der absoluten Mausposition. 

14 

(0.B, X-Position.W, Y-Position.W) 

Reaktion: 

Setzen des internen Koordinatenzählers. 

15 

(-) 

Reaktion: 

Y-Ordinatenursprung liegt unten. 
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16 

(-) 

Reaktion: 

Y-Ordinatenursprung liegt oben. 

17 

(-) 

Reaktion: 

Datenübertragung wieder auf nehmen (nach #19). 

18 

(-) 

Reaktion: 

Abschalten der Maus (Vorsicht!). 

19 

(-) 

Reaktion: 

Datenübertragung stoppen (Vorsicht!). 

20 

(-) 

Reaktion: 

Ab sofort Meldung jeder Joystick-Bewegung. 

21 


Reaktion: 

Abschalten der Funktion 20 sowie der Maus. 

22 

(-) 

Reaktion: 

Joystick-Abfrage. 

23 

(Meldungsabstand.B in l/100s) 

Reaktion: 

Ab sofort Joystick-Dauermeldung. 

24 

(-) 

Reaktion: 

Ab sofort Feuerknopf-Dauermeldung von Joystick 1 
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25 

(RX, RY, TX, TY, VX, VY (alle .B» 

Reaktion: 

Ab sofort Meldung der Joystick-Bewegungen als 
Cursortastendruck v (Joystick 0). Alle Werte sind als 
Zeitangaben in 1/10 Sekunden zu interpretieren. Vor 
Ablauf der Zeit R werden Cursortastenmeldungen im 
Intervall T gesendet, danach im Intervall V (siehe 
Tastenwiederholung im Kontrollfeld). 

26 

(-) 

Reaktion: 

Joystick-Funktionen abschalten. 

27 

(Jahr, Monat, Tag, Stunde, Minute, Sekunde) 

Reaktion: 

Uhrzeit setzen. Die Parameter sind als BCD-Bytes zu 
übergeben. Beispiel: 12.11.1987, 15:32:12 ergibt die 
Parameterbytes $87, $11, $12, $15, $32, $12. 

28 

(-) 

Reaktion: 

Uhrzeitabfrage. 


32 (Adresse.W, Anzahl.B, Bytes...) 

Reaktiont: Tastaturspeicher laden. Es wird "Anzahl" Bytes ab 



der "Adresse" in den Tastaturspeicher geladen. 

33 

(Adresse.W) 

Reaktion: 

Tastaturspeicher lesen. Es werden ab "Adresse" 6 
Bytes aus dem Tastaturspeicher gelesen und zurück¬ 
gesendet. 

34 

(Adresse.W) 

Reaktion: 

Start eines Programms ab "Adresse" im Tastatur¬ 
speicher. 
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5. Betriebssystem-Programmierung 


Das Betriebssystem TOS, welches im Mega ST ebenso wie in 
seinen kleineren Brüdern 260/520/1040 ST eingebaut ist, stellt 
nichts anderes dar als eine Ansammlung von Programmteilen. 
Diese werden teilweise bereits beim Einschalten des Rechners 
aufgerufen, teilweise sind sie aber auch nur dem Programmierer 
zur Verfügung gestellt. Mit Hilfe dieser Routinen ist es recht 
einfach, die große Anzahl an Funktionen aus dem ST herauszu¬ 
locken, die diesen ja so interessant machen. 

Das gesamte Betriebssystem, das mit ca. 192 KByte Länge sehr 
umfangreich ist, ist wiederum in mehrere Teile untergliedert. 
Jeder dieser Teile deckt einen bestimmten Aufgabenbereich ab, 
wie etwa Ein-/Ausgabe-Operationen, grafische Grundfunktionen 
oder aber die Mausüberwachung. In den folgenden Unterkapiteln 
werden wir nun die einzelnen Teile genauer betrachten. Dabei 
wird jeweils ein kleines Beispiel vorgestellt, wie man die Funk¬ 
tionen dieses Abschnittes programmieren kann. Die dafür vor¬ 
gestellten Programmiersprachen sind GFA-BASIC, C und 
Maschinensprache (Assembler). 


5.1 GEMDOS 

Das GEMDOS ist für den Betrieb des ST eigentlich der wichtig¬ 
ste Teil des Betriebssystems. Seine Aufgaben sind nämlich das 
Filehandling, also das Laden und Abspeichern von Dateien und 
Programmen, das Starten und Beenden von Programmen sowie 
die Standard Ein- und Ausgaben auf Bildschirm, Drucker usw. 

Der Aufruf einer GEMDOS-Funktion geschieht mittels des 
Maschinenbefehls TRAP #1. Dieser Befehl bewirkt, daß eine 
bestimmte Routine des Betriebssystems auf gerufen wird. Damit 
das GEMDOS auch weiß, welche Funktion er mit welchen Wer¬ 
ten ausführen soll, werden vor dem TRAP #1-Befehl noch ver¬ 
schiedene Parameter auf dem Prozessorstapel abgelegt. Zuoberst 
auf dem Stapel und somit zuletzt dort abgelegt wird die 16-Bit- 
Nummer der Funktion, die eigentlich gestartet werden soll. 
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Dies klingt komplizierter, als es in Wirklichkeit ist. Der Aufruf 
einer Funktion aus der Programmiersprache C bewirkt nämlich 
eben das: die beim Aufruf mit angegebenen Parameter werden 
auf dem Stapel an die Routine übergeben. Der Programmierer 
merkt davon nichts. Ebenso einfach ist der GEMDOS-Aufruf 
aus einem GFA-BASIC-Programm heraus. Hier wird einfach der 
GEMDOS()-Befehl eingesetzt, in dem ebenfalls die Parameter in 
die Klammer der Reihe nach eingetragen werden. 

Betrachten wir hierzu ein Beispiel. Die GEMDOS-Funktion mit 
der Nummer $48 (72) mit dem Namen MALLOC hat die Auf¬ 
gabe, einen Speicherbereich zu reservieren. Der einzige Para¬ 
meter, welcher außer der Funktionsnummer $48 benötigt wird, 
ist die Größe des gewünschten Speicherbereichs in Bytes. Diese 
Funktion gibt auch ein Ergebnis zurück, und zwar die Adresse, 
an der der reservierte Speicher beginnt. Ist dieser Wert jedoch 
negativ, so ist ein Fehler aufgetreten! 

Mit der MALLOC-Funktion kann übrigens auch die Größe des 
freien Speichers des ST ermittelt werden, indem man als ge¬ 
wünschte Speichergröße -1 übergibt. 

Wir wollen nun mit dieser Funktion einen Speicherbereich von 
10000 Bytes reservieren. In Assembler wird dies folgendermaßen 
programmiert: 


move.1 

#10000,-(sp) 

;Länge auf den Stapel 

move.w 

#$48,-(sp) 

;Funkt ionsnummer dazu 

trap 

#1 

;GEMDOS aufrufen 

addq.1 

#6,sp 

;die Parameter vom Stapel löschen 


Im Register DO liegt nun die Adresse des reservierten Speicher¬ 
bereiches. Der Additionsbefehl nach dem TRAP dient übrigens 
dazu, die auf den Stapel gelegten Werte wieder davon zu "ent¬ 
fernen". Leider ist dies grundsätzlich nach jedem Aufruf einer 
Betriebssystems-Routine über TRAP nötig. 

Das gleiche Beispiel nun in der Programmiersprache C. Hier 
braucht man sich nicht um den Stapel oder den TRAP-Befehl zu 
kümmern, sondern ruft die Funktion selbst mit Namen auf: 
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long Adresse 
Adresse = Malloc(IOOOO) 

Dies ist alles. Fast ebenso einfach ist dies in GFA-BASIC, wo 
man allerdings nicht den Namen der Funktion verwenden kann. 
Hier muß man wieder die Funktionsnummer wissen. Das Er¬ 
gebnis ist dann folgendes: 

Adresse%=Gemdos(&H48,L:10000) 


Das L:, welches vor dem Wert 10000 steht, bewirkt die Übergabe 
dieses Parameters als 32-Bit-Langwort. Dies ist sehr wichtig, da 
sonst durch falsche Parameter eine böse Überraschung auf treten 
kann! 

Beginnen wir nun mit der Auflistung aller GEMDOS-Funk- 
tionen mit ihrer Nummer und den benötigten Parametern. Die 
Funktion wird dabei zunächst mit Namen aufgeführt. Die fol¬ 
gende Klammer enthält die Parameter in der für C bzw. GFA- 
BASIC relevanten Reihenfolge (ohne Funktionsnummer); in As¬ 
sembler muß diese Reihenfolge für die move.x ...,-(sp)-An- 
weisungen umgekehrt werden. Die Parameter tragen jeweils den 
Anhang .L, wenn sie als 32-Bit-Langwort zu übergeben sind. 


$00/0 PTERM0 () 

Das laufende Programm wird beendet, sein Speicher gelöscht 
und freigegeben und wieder in das aufrufende Programm (meist 
Desktop) zurückgegeben. 


$01/1 CCONIN () 

Es wird auf Tastendruck gewartet und der ASCII-Code der 
Taste im LO-Wort sowie der interne Scan-Code im Hl-Wort 
zurückgegeben. Außerdem wird das eingegebene Zeichen auf 
dem Bildschirm dargestellt. 
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$02/2 CCONOUT (Zeichen) 

Ausgabe eines einzelnen Zeichens auf dem Bildschirm an der 
aktuellen Cursorposition. 


$03/3 CAUXIN () 

Übernahme eines Zeichens von der seriellen RS232-Schnittstelle 
in DO. 


$04/4 CAUXOUT (Zeichen) 

Ausgabe eines Zeichens über die RS232-Schnittstelle. 


$05/5 CPRNOUT (Zeichen) 

Ausgabe eines Zeichens über die parallele Centronics- bzw. 
Drucker-Schnittstelle. 


$06/6 CRAWIO (Modus) 

Es wird, je nach Modus, entweder die Tastatur abgefragt, ob 
eine Taste gedrückt wurde, oder ein Zeichen ausgegeben. 

Modus=$FF Die Tastatur wird überprüft und der ASCII- 
und SCAN-Code an Register DO übergeben (s. 
CONIN). 

ModusoSFF Ausgabe dieses Zeichens an der augenblick¬ 
lichen Cursorposition (s. CONOUT). 


$07/7 CRAWCIN () 

Es wird, ähnlich wie bei CONIN, auf einen Tastendruck ge¬ 
wartet, jedoch wird dieses Zeichen dann nicht auf dem Bild¬ 
schirm dargestellt. 
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$08/8 CNECIN () 

Warten auf einen Tastendruck ohne Darstellung des Zeichens auf 
dem Bildschirm. Diese Funktion entspricht genau der vorher¬ 
gehenden. 


$09/9 CCONWS (Zeiger.L) 

Ausgabe einer Zeichenkette auf dem Bildschirm ab der augen¬ 
blicklichen Cursorposition. Übergeben wird die Adresse des 
Textes, in DO zurückgegeben wird die wirklich ausgegebene 
Zeichenkettenlänge. Der Text muß mit einem Nullbyte ($00) ab¬ 
geschlossen sein. 


$0A/10 CCONRS (Zeiger.L) 

Es wird eine ganze Zeichenkette über die Tastatur eingelesen. 
Die eingegebenen Zeichen erscheinen an der jeweils aktuellen 
Cursorposition auf dem Bildschirm und im Puffer, dessen 
Adresse übergeben wird. Es werden jedoch keine Steuerzeichen 
interpretiert. 


Folgende CONTROL-Codes werden akzeptiert: 


Control-C 

Control-H 

Control-I 

Control-J 

Control-M 

Control-R 

Control-U 

Control-X 


Eingabe und Programm (!) beenden 

Backspace 

Tabulator 

Eingabe beenden, Zeilenvorschub 

Eingabe beenden, Wagenrücklauf 

Eingabe in neuer Zeile ausgeben 

Ignorieren, neue Zeile beginnen 

Zeile löschen, Cursor zurück zum Zeilenanfang. 


$0B/11 CCONIS () 

Überprüfung des Tastaturbuffers auf seinen Inhalt. War seit dem 
Letzten Auslesen eines Zeichens von der Tastatur eine neue 
Taste gedrückt worden, so enthält DO nach der Rückkehr den 
Wert -1 (SFFFF). Wird jedoch eine Null zurückgegeben, so war 
keine neue Taste gedrückt worden. 
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SOE/14 DSETDRV (LW-Nummer) 

Das mit der übergebenen Nummer bestimmte Laufwerk (LW- 
Nummer: A=0, B=1 usw.) wird zum aktuellen Laufwerk erklärt. 
Nach Rückkehr enthält das Register DO die Nummer des vorher 
aktuelle Laufwerkes. 


$10/16 CCONOS () 

Der Status der Bildschirm-Ausgabe wird ermittelt. Wird $FFFF 
zurückgegeben, kann ein Zeichen dargestellt werden, sonst nicht. 


$11/17 CPRNOS () 

Der Status der parallelen Schnittstelle (Centronics) bzw. des 
Druckers wird ermittelt. Das Ergebnis bedeutet: 

D0= 0 => Off Line 

D0=-1 ($FFFF) => On Line 


$12/18 CAUXIS () 

Der Eingabestatus der seriellen RS232-Schnittstelle wird ermit¬ 
telt. Das Ergebnis bedeutet: 

D0= 0 => Zeichen verfügbar 

D0=-1 ($FFFF) => Zeichen nicht verfügbar 


$13/19 CAUXOS () 

Es wird getestet, ob ein Zeichen über die RS232-Schnittstelle 
gesendet werden kann. Es gilt: 

D0= 0 => Zeichen kann gesendet werden 

D0=-1 ($FFFF) => Zeichen kann nicht gesendet werden 


$19/25 DGETDRV () 

Das derzeit aktive Laufwerk wird zurückgegeben (A=0, B=1 
usw.). 
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$lA/26 FSETDTA (Zeiger.L) 

Die Adresse des 44-Byte-Buffers für Diskettenoperationen DTA 
(Disk Transfer Adress, siehe Funktion $4E: SFIRST) wird fest¬ 
gelegt. 


$20/32 SUPER (0.L oder SP.L alt) 

Umschalten des Betriebsmodus des 68000-Prozessors von User- 
auf Supervisor-Modus (0.L übergeben) oder umgekehrt (alten 
SP.L übergeben). Der alte Stack-Pointer liegt nach Rückkehr in 
DO. 


$2A/42 TGETDATE () 

Übernimmt das Datum aus der internen Uhr. Das Datum liegt 
dann wie folgt codiert in Register DO: 

Bit Inhalt 

0-4 Tag von 0-31 

5-8 Monat von 1-12 

9-12 Jahr minus 1980 (0..119) 


$2B/43 TSETDATE (Datum) 

Das Datum der internen Uhr wird gesetzt. Das Datum muß zu¬ 
vor codiert werden (s. GET DATE). 


$2C/44 TGETTIME () 

Übernimmt die Uhrzeit aus der internen Uhr. Die Uhr läuft in 
2-Sekunden-Schritten und wird wie folgt an Register DO über¬ 
geben: 

Bit Inhalt 

0-4 Sekunden (2 Sekunden = Wert+1) 

5 - 10 Minuten 

11 - 15 Stunden (24-Stunden-Anzeige!) 
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$2D/45 TSETTIME (Zeit) 

Die interne Uhr wird gestellt. Die Uhrzeit muß codiert in 
Register DO übergeben werden (s. GET TIME). 


$2F/47 FGETDTA () 

Die Adresse des 44-Byte-Buffers für Diskoperationen DTA wird 
ermittelt und zurückgegeben. 


$30/48 SVERSION () 

Die GEMDOS-Versionsnummer wird in Register DO zurückge¬ 
geben. 


$31/49 PTERMRES (Länge.L, Rückgabestatus) 

Rücksprung zum rufenden Programm mit Rückgabe eines Pa¬ 
rameters. Nach dem Aufruf wird der Speicherbereich mit dem 
Programm im Gegensatz zur TERM-Funktion nicht gelöscht. Die 
Anzahl der zu schützenden (und nicht zu löschenden) Bytes wird 
zusätzlich in Länge.L übergeben. Der Wert des Status ist be¬ 
liebig, üblicherweise gilt aber 0=OK. 


$36/54 DFREE (Zeiger.L, Laufwerksnummer) 

Es wird ein Informations-Block (16 Bytes) über die Belegung 
einer Diskette im angegebenen Laufwerk ab der angegebenen 
Adresse abgelegt. Der Aufbau dieses Informations-Block ist fol¬ 
gender (je 4 Bytes): 

- Anzahl der freien Allocation Units (freie Cluster) 

- insgesamt vorhandene Cluster (je 1 KByte) 

- Sektorgröße (Bytes) 

- Anzahl der zu einem Cluster gehörenden Sektoren (2) 
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$39/57 DCREATE (Zeiger.L) 

Es wird ein neuer Ordner angelegt, auf dessen Pfadnamen der 
Zeiger weist. In Register DO erhält man den Status: ist er 0, so 
wurde der Ordner korrekt angelegt. 


$3A/58 DDELETE (Zeiger.L) 

Es wird der Ordner, auf dessen Pfadname der Zeiger weist, von 
der Diskette gelöscht. Voraussetzung ist allerdings, daß dieser 
Ordner leer ist! 

$3B/59 DSETPATH (Zeiger.L) 

Es wird ein Unterdirectory zum aktuellen Directory erhoben. 
Der Zeiger weist auf Pfadnamen des Unterdirectorys. 


$3C/60 FCREATE (Zeiger.L, Attribut) 

Es wird eine neue Datei, auf deren Pfadnamen der Zeiger weist, 
erstellt. Das Attribut kann folgende Werte annehmen: 

Attribut: 0 = lesen/schreiben 

1 = nur lesen 

2 = versteckte Datei 

4 = versteckte Systemdatei 

8 = Datei hat Disketten-Name (VOLUME-Datei) 

$3D/61 FOPEN (Zeiger.L, Modus) 

Eröffnen einer bereits angelegten Datei, auf deren Pfadnamen 
der Zeiger weist. Der Modus bedeutet: 

Modus Öffnen zum 

0 Lesen 

1 Schreiben 

2 Lesen und Schreiben 

In Register DO erhält man die Handle-Nummer der Datei oder 
einen negativen Fehlercode. 
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$3E/62 FCLOSE (Handle) 

Schließen einer mit OPEN geöffneten Datei. 


$3F/63 FREAD (Handle, Anzahl.L, Zeiger.L) 

Lesen von "Anzahl" Bytes aus der durch "Handle" bestimmten 
geöffneten Datei in den Speicher. Der Zeiger weist auf den 
Pufferanfang. Register DO enthält dann die Anzahl der gelesenen 
Bytes oder eine negative Fehlernummer. 


$40/64 FWRITE (Handle, Anzahl.L, Zeiger.L) 

Schreiben von "Anzahl" Bytes aus dem Speicher ab "Zeiger" in 
die durch "Handle" bestimmte geöffnete Datei. 


$41/65 FDELETE (Zeiger.L) 

Es wird die Datei, auf deren Pfadnamen der Zeiger weist, von 
der Diskette bzw. Harddisk gelöscht. Das Register DO enthält 
dann den Status (0=OK, <0=Fehlernummer). 


$42/66 FSEEK (Offset.L, Handle, Modus) 

Bewegen des Datensatzzeigers für relativen Zugriff innerhalb der 
durch "Handle" bestimmten Datei. "Offset" gibt die Anzahl der 
Bytes an, um die der Zeiger bewegt werden soll (auch negative 
Werte möglich). Der "Modus" setzt fest, von wo aus der Offset 
gezählt werden soll: 

0 vom Dateianfang 

1 von der aktuellen Position 

2 vom Dateiende 

Register DO enthält dann die neue Position des Datenzeigers oder 
eine negative Fehlernummer. 
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$43/67 FATTRIB (Zeiger.L, Modus, Attribut) 

Ermitteln und ggf. auch ändern des Dateiattributes. "Modus" be¬ 
stimmt: 

0 Attribut nur ermitteln 

1 Attribut setzen. 


Attribut: 0 

1 
2 
4 
8 

10 

20 


lesen/schreiben 
nur lesen 
versteckte Datei 
verteckte Systemdatei 

Datei hat Disketten-Name (Volume-Datei) 

File ist Unterdirectory 

Datei beschrieben und geschlosssen 


$45/69 FDUP (Standard-Handle 1-5) 

Ermittelt die nächste freie Handle-Nummer für ein Gerät, wel¬ 
ches die angegebene Standard-Handle trägt, und weist diesem 
Standard-Gerät (Console, Drucker, RS232) eine neue Nummer 
zu. 


$46/70 FFORCE (Standard-Handle, File-Handle) 

Alle Ein- und Ausgaben über Tastatur und Bildschirm (=> Stan¬ 
dard-Handle) können mit dieser Funktion in bzw. aus einer 
Datei (=> File-Handle) umgeleitet werden. 


$47/71 DGETPATH (Zeiger.L, LW-Nummer) 

Ermittlung des Pfadnamens zum Unterdirectory, welches zum 
Hauptdirectory des angegebenen Laufwerks erhoben wurde. 
(Laufwerk: 0=aktives, 1=A, 2=B usw..) Der Zeiger weist auf 
einen 64-Byte-Pfadnamen-Puffer, in den das Ergebnis einge¬ 
tragen wird. 
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$48/72 MALLOC (Anzahl.L) 

Anforderung von Speicherplatz durch laufendes Programm. Wird 
in "Anzahl" der Wert -1 übergeben, so wird der insgesamt freie 
Speicher ermittelt. Andernfalls enthält "Anzahl" die zu reser¬ 
vierende Speicherbereichgröße in Bytes. Register DO enthält bei 
der Rückkehr die Startadresse des Speicherblockes, die Anzahl 
der freien Bytes (Anzahl = -1) oder eine negative Fehlermeldung 
(Speicher belegt). 


$49/73 MFREE (Adresse.L) 

Freigabe des mit MALLOC angeforderten Speicherplatzes. Die 
Adresse ist die von MALLOC gelieferte Startadresse (es sind 
auch andere Adressen möglich, wenn z.B. nur ein Speicherteil 
freigegeben werden soll). 


$4A/74 MSHRINK (0, Adresse.L, Anzahl.L) 

Reservierung von "Anzahl" Bytes ab "Adresse". Der Null-Para¬ 
meter ist zwar ohne Bedeutung, muß jedoch mit angegeben 
werden. 

Nachladen von Programmen und ggf. Autostart. Die Parameter 
sind, bis auf den Modus, Zeiger auf einen durch ein Nullbyte 
abgeschlossenen Text (oder nur auf eine Null). Sie bedeuten: 

Modus: 0 = Autostart 

3 = nur laden 

4 = nur starten 

5 = Base-Page anlegen 

Pfad: Zeiger auf Pfadnamen der zu ladenden Datei 

Command: Zeiger auf Kommando-Zeile für das aufzurufende 
Programm 

Umgebung: Zeiger auf "Umgebungs-Beschreibungs-String" 

In Register DO wird entweder die Adresse der Base-Page oder 
eine negative Fehlermeldung zurückgeliefert. 
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$4C/76 PTERM (Wert) 

Rückkehr zum rufenden Programm und Speicherfreigabe. Es 
kann im Gegensatz zur PTERMO-Funktion ein frei wählbarer 
Rückgabewert an das aufrufende Programm übermittelt werden. 


$4E/78 FSFIRST (Zeiger.L, Attribut) 

Es wird überprüft, ob eine Datei existiert, und deren Merkmale 
werden zurückgegeben. Bei der Angabe des gesuchten Filenamen 
können Zeichen durch "?" und Zeichengruppen (Filenamenteile) 
durch ersetzt werden. Der Zeiger weist auf den Filenamen. 
Vor Aufruf muß eine DTA definiert sein (=> SET DTA). 


Attribut: 0 

lesen/schreiben 

1 

nur lesen 

2 

versteckte Datei 

4 

verteckte Systemdatei 

8 

Datei hat Disketten-Name (Volume-Datei) 

10 

File ist Unterdirectory 

20 

Datei beschrieben und geschlossen 

Aufbau des 44- 

-Byte-Puffers an der DTA: 

Byte 0-20 

reserviert (GEMDOS) 

21 

Attribut, s.o. 

22-23 

Uhrzeit (Dateierstellung) 

24-25 

Datum (Dateierstellung) 

26-29 

Dateilänge (Bytes: Low, High) 

30-43 

Dateiname und Extender 

$4F/79 

FSNEXT () 

Es wird nach weiteren Dateien auf der Diskette gesucht, auf die 


die Parameter von FSFIRST passen. Wird in DO ein negativer 
Wert zurückgegeben, ist wahrscheinlich keine weitere passende 
Datei vorhanden (siehe Fehlernummer). 
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$56/86 FRENAME (0, Alt.L, Neu.L) 

Umbenennen von Dateien. "Neu" zeigt auf den neuen Filenamen, 
"Alt" auf den alten. 


$57/87 FDATIM (Zeiger.L, Handle, Flag) 

Ermitteln/Setzen von Datum und Uhrzeit der Erstellung einer 
durch "Handle" bestimmten Datei. Mit dem "Modus" wird be¬ 
stimmt: 


0 Datum/Zeit setzen 

1 nur ermitteln 

"Zeiger" weist auf einen 4-Byte-Puffer, in dem die Bytes 0 und 
1 die Zeit, die Bytes 2 und 3 das Datum enthalten. 


GEMDOS-Fehlermeldungen: 

Tritt bei der Bearbeitung einer GEMDOS-Funktion ein Fehler 
auf, so wird dies üblicherweise durch einen negativen Rück¬ 
gabewert im Register DO angezeigt. Diese Werte bedeuten fol¬ 
gende Fehler: 

-0 Kein Fehler 

-1 Allgemeiner Fehler 

-2 Diskettenstation nicht ansprechbar 
-3 Befehl unbekannt 

-4 CRC-Fehler 

-5 Falsche Rückmeldung (Befehl ungültig) 

-6 Suchfehler (Sektor nicht vorhanden) 

-7 Unbekannter Boot-Sektor 

-8 Sektor nicht gefunden 

-9 Druckerfehler (Papierende) 

-10 Fehler beim Schreiben 

-11 Fehler beim Lesen 

-12 Allgemeiner Fehler 

-13 Diskette ist schreibgeschützt 

-14 Diskette ist gewechselt worden 

-15 Gerät unbekannt 

-16 Prüffehler (Sector-Verify) 
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-17 Keine Diskette vorhanden 
-32 Funktionsnummer ungültig 
-33 Datei nicht gefunden 
-34 Pfad/Pfadname nicht gefunden 

-35 Es können keine weiteren Dateien mehr geöffnet werden. 

-36 Zugriff nicht möglich 

-37 Handle-Nr. ungültig 

-39 Zuwenig Speicherplatz vorhanden 

-40 Speicherblockadresse ungültig 

-46 Laufwerkbezeichnung ungültig 

-49 Keine weiteren Dateien vorhanden 


5.2 BIOS 

Das BIOS des ST hat die Aufgabe, die Hardware des Rechners 
auf einfache Weise dem GEMDOS oder auch dem Programmie¬ 
rer verfügbar zu machen. Es sind dort Routinen enthalten, die 
Ein- und Ausgaben von einzelnen Zeichen an die verschiedenen 
Devices (Bildschirm, Drucker usw.) leiten sowie deren Status 
ermitteln. Außerdem werden einige grundlegende Disketten¬ 
operationen erledigt. 

Die Funktionen des BIOS werden, ähnlich wie die GEMDOS- 
Routinen, von Assemblerprogrammen aus mit TRAP #13 auf¬ 
gerufen. Die Funktionsnummer sowie die Parameter müssen 
wieder auf dem Stapel liegen, wobei die Nummer immer ein 
Wort (16 Bit) ist. 

Auch hier wieder ein kleines Beispiel für die Programmierung 
der BIOS-Funktionen: die Ausgabe eines Zeichens (X) an die 
RS232-Schnittstelle durch die bconout-Funktion (Code=3). 


move.w # , X',-(sp) 
move.w #1,-(sp) 
move.w #3,-(sp) 
trap #13 
addq.l #6,sp 


;auszugebendes Zeichen: 'X' 
;Ausgabegerät: RS232 
;Code der Funktion bconout 
;BI OS-Aufruf 
;Stack korrigieren 
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Der entsprechende C-Aufruf ist dann: 

int device, char; 
device = 1; 
char = 88; 

void Bconout(device, char); 

Das C-Programm legt die Parameter in der angegebenen 
Reihenfolge auf den Stack. Die Reihenfolge im C-Programm 
wird auch in der folgenden Liste eingehalten, wobei .L ein 
Langwort (32 Bit) bedeutet; alle anderen Parameter sind Worte 
(16 Bit). 

Obwohl es mit dem OUT-Befehl einfacher ist, folgt nun noch 
der Vollständigkeit halber die GfA-Version obigen Programmes: 

Void Bios(3,1,asc("X")) 

Doch nun zu der Gesamtliste der BIOS-Funktionen: 


$00/0 getmpb (Zeiger.L) 

Füllt einen 12-Byte-Block ab der Adresse "Zeiger" mit dem 
Memory-Parameter-Block, welcher wiederum aus drei Zeigern 
auf je eine Struktur von 4 Langworten besteht. 

Die erste dieser Strukturen bezeichnet den verbleibenden freien 
Speicher, die zweite den belegten Speicher. Die Strukturen haben 
den Aufbau: 

m_link.L Zeiger auf den nächsten Block oder 0 
m_start Startadresse dieses Blocks 
m_length Länge des Blocks in Bytes 
m_own Process-Descriptor 
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$01/1 bconstat (Device) 

Gibt den Status des Eingabegeräts "Device" aus. Für die Device- 
Nummer gilt: 

0 Printer 

1 RS232 

2 Bildschirm+Tastatur 

3 MIDI 

4 IKBD (Tastatur-Port) 


$02/2 conin (Device) 

Holt ein Zeichen vom Eingabegerät "Device". Die Bedeutung 
dieser Nummer: siehe oben. 


$03/3 bconout (Device) 

Gibt ein Zeichen char auf dem durch "Device" bezeichneten 
Gerät aus. Lesen oder Schreiben von Diskettensektoren, je nach 
Inhalt des Read/Write-Flags "Flag”: 

0 lesen 

1 schreiben 

2 lesen, Disk-Wechsel ignorieren 

3 schreiben, Disk-Wechsel ignorieren. 

Der "Zeiger" weist auf den Schreib-/Lese-Puffer, die "Anzahl" 
gibt die Anzahl der Sektoren und die "Nummer" den ersten 
logischen Sektor an. "Laufwerk" schließlich bezeichnet das 
Laufwerk, von dem gelesen bzw. auf das geschrieben werden 
soll (0=A, 1=B, 2=C usw.). 


$05/5 setexec (Nummer, Vektor.L) 

Diese Funktion ermöglicht das Verändern eines Exception- 
Vektors des Prozessors. Die "Nummer" enthält die Nummer des 
gewählten Vektors, in "Vektor" steht der neue Wert. Setzt man 
hier -1 ein, so wird der Vektor nicht verändert. Aus der Funk¬ 
tion erhält man schließlich den alten Vektor-Inhalt zurück. 
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$06/6 tickcal () 

Liefert den Zeitraum zwischen Systemtimer-Aufrufen in 1/1000 
Sekunden zurück (20). 

Man erhält aus dieser Funktion einen Zeiger auf den Bios-Para- 
meter-Block (BPB) des durch "Laufwerk" angegeben Laufwerks 
(0=A, 1=B usw.). Dieser BPB hat folgenden Aufbau (alle Werte 
16 Bit): 

recsiz Sektorgröße (Bytes) 

clsiz Clustergröße (engl: Haufen), Sektoren 

clsizb Clustergröße (Bytes) 

rdlen Directorylänge (Sektoren) 

fsiz FAT-Größe (Sektoren) 

fatrec Sektornummer (1. Daten-Cluster) 

numcl Clusteranzahl (Diskette) 

bflags Flags 


$08/8 bcostat (Device) 

Bereitschaftsüberprüfung zur Ausgabe auf dem Gerät "Device". 
Das Ergebnis bedeutet: 

0 warten 

-1 bereit zum Ausgeben 


$09/9 mediach (Laufwerk) 

Überprüfung auf Diskettenwechsel im "Laufwerk" (A=0, B=l). 
Als Ergebnis erhält man in DO: 

0 kein Wechsel stattgefunden 

1 evtl. Wechsel 

2 Wechsel hat stattgefunden 
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$0A/10 drvmap () 

Mit dieser Funktion wird überprüft, welche Diskettenlaufwerke 
angeschlossen sind. Man erhält in DO das Bitmuster der ange¬ 
schlossenen Laufwerke: Bit 0=A, Bit 1=B usw. Es wird allerdings 
immer mindestens %11=3 ausgegeben, auch wenn nur ein Lauf¬ 
werk vorhanden ist. 


$0B/11 kbshift (Modus) 

Diese Funktion ermittelt oder verändert den Nicht-ASCII- 
Tastenstatus. Wird in "Modus" -1 übergeben, wird der Status nur 
ausgelesen, bei einem Modus >0 wird dieser als neuer Status ge¬ 
schrieben. Die Bits des Status bedeuten: 

Bit Sondertaste 

0 Shift rechts 

1 Shift links 

2 Control 

3 Alternate 

4 Caps Lock on 

5 Maus rechts/CLR Home 

6 Maus links/Insert 

7 unbenutzt 


5.3. XBIOS 

XBIOS steht für Extended BIOS und bedeutet, daß dieser 
Betriebssystemteil eine Erweiterung zum BIOS darstellt. Es wer¬ 
den hier die besonderen Fähigkeiten bzw. Verhältnisse in Atari 
ST sowie die spezielle Hardware bedient. 

Die XBIOS-Funktionen werden fast genauso wie die BIOS- 
Routinen aufgerufen. Der Unterschied liegt darin, daß nun mit 
TRAP #14 die Funktion aufgerufen wird. Die Parameter-Über¬ 
gabe ist jedoch identisch mit derjenigen des BIOS. 




240 


Das große Mega-ST-Buch 


Auch für die Programmierung in GFA-BASIC ist XBIOS er¬ 
reichbar. Ebenso wie beim BIOS gibt es hier die XBIOS()-Funk- 
tion, der die Funktionsnummer und die Parameter übergeben 
werden müssen. 

Nehmen wir hier einmal eine XBIOS-Funktion heraus und 
schreiben ein kleines Beispielprogramm. Dieses Programm ver¬ 
wendet die Funktion 8, Floprd, um einen beliebigen Sektor von 
einer Diskette bzw. RAM- oder Harddisk zu lesen, und gibt 
dessen Inhalt sedezimal (hexadezimal) und als ASCII-Zeichen 
auf dem Bildschirm aus: 

1 *** Mini-Disk-Monitor *** 

Openw 0 
Deftext ,,,6 
Cls 

Print ****** Mini-Disketten-Monitor *****" 

I 

Do 

Print 

Input "Laufwerk ";Lw% 

Input "Seite ";Seite% 

Input "Track ";Track% 

Input "Sektor ";Sec% 

i 

A$=String$(512 / 0) ! Puffer löschen 

Stat%=Xbios(8,L:Varptr(A$),L:1,Lw% # Sec%,Track%,Seite% # 1) 

i 

If Stat% ! Status<>0: Fehler! 

Print ChrS(7) 

Print "Fehler , "Stat%'"aufgetreten !" 

End 

Endif 

i 

For I%=1 To 512 

If Frac((I%-1)/16)=0 
Print 

Print Right$("00"+Hex$(I%),3)" ' ! Adresse ausgeben 

X%=460 
Endif 
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Print Right$( ,, 0"+Hex$(Asc(Mid$(A$ / 1%))),2) 1 ! Byte und 
Text X%,Crslin*8,Mid$(A$,I%,1) ! ASCII ausgeben 

Add X%,9 
Next 1% 

Print 

Loop ! und so weiter.. 

Hier nun die Liste aller XBIOS-Funktionen mit ihren Funk¬ 
tionsnummern und Parametern: 


$00/0 initmous (Typ, Zeiger.L, Vektor.L) 

Mit dieser XBIOS-Funktion werden die Maus-Bearbeitungs- 
Routinen initialisiert. Der zu übergebende Typ bedeutet: 

0 Maus abschalten 

1 Maus einschalten (relativ) 

2 Maus einschalten (absolut) 

3 unbenutzt 

4 Maus einschalten (Tastatur-Modus) 


Der "Zeiger" weist auf einen folgendermaßen aufzubauenden 
Parameterblock: 


topmode.B 

buttons.B 

xparam.B 

yparam.B 


0=Koordinatenkreuz unten, l=oben 
Mausknopf-Parameter 
Maus-Skalierung in X-Richtung 
Maus-Skalierung in Y-Richtung 


Der "Vektor" schließlich zeigt auf die Maschinenroutine, welche 
ab sofort die Maus-Interrupts verarbeiten soll. 


$01/1 ssbrk (Anzahl) 

Reserviert "Anzahl" Bytes Speicherplatz am oberen Ende des 
Speichers. In DO erhält man die Startadresse des reservierten 
Bereichs zurück. 
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$02/2 physbase () 

Man erhält aus dieser Funktion den Beginn des Speicher¬ 
bereiches, der vom Bildschirm-RAM dargestellt wird (physika¬ 
lische Bildschirmbasis), in DO zurück. 


$03/3 logbase () 

Hier bekommt man die Adresse des Speicherbereiches, der von 
allen Ausgabefunkionen als Bildschirm-Basis benutzt wird 
(logische Bildschirm-Basis), in DO zurück. 


$04/4 getrez () 

Diese Funktion ermittelt die Bildschirmauflösung (je nach 
Monitor) und gibt in DO zurück: 

0 niedrige Auflösung 320x200 Pixel/16 Farben 

1 mittlere Auflösung 640x200 Pixel/4 Farben 

2 hohe Auflösung 640x400 Pixel/Monochrom 


$05/5 setscreen (Log_adr.L, Phys_adr.L, Resolution) 

Mit dieser Funktion kann die Basisadresse des logischen und 
physikalischen Bildschirmspeicher und die Bildauflösung ver¬ 
ändert werden. "Log_adr" bezeichnet die logische, "Phys_adr" 
die physikalische Bildspeicher-Adresse und Resolution die Auf¬ 
lösungsstufe (0=niedrig, l=mittel, 2=hoch). Wird für einen der 
Parameter -1 eingesetzt, so wird dieser nicht verändert. 


$06/6 setpalette (Zeiger.L) 

Mit dieser Funktion kann eine neue Farbmischungs-Tabelle be¬ 
stimmt werden. Der "Zeiger" weist dann auf eine Farbtabelle mit 
16 Worten für die 16 Farben. 



Betsiebss^stem^Pro^r^mn^D^lS. 


243 


$07/7 setcolor (Nummer, Farbe) 

Hier wird nur eine Farbe verändert. Die "Nummer" (0-15) ent¬ 
spricht der Farbnummer, die "Farbe" (0-$777) der neuen 
Mischung. Wird als Farbe -1 übergeben, so ändert sich nichts. 
Als Ergebnis erhält man auf jeden Fall die alte Mischung der 
Farbe. 


$08/8 


floprd (s.u.) 


Lesen von Diskettensektoren. Die zu übergebenden Parameter 
sind recht zahlreich, daher hier die Auflistung in der gewohnten 
Reihenfolge: 


Puffer.L 

Filler.L 

Drive 

Sector 

Track 

Seite 

Count 


Zeiger auf (512*Sektoren) Bytes langen 

Puffer 

unbenutzt 

Laufwerk: 0=A, 1=B ect. 
erster zu lesender Sektor 0-9 
Spurnummer (0-79 oder 0-39) 

Diskettenseite 0/1 
Sektorenzahl 1-9 


In DO erhält man zurück: 

0 = OK <0 = Fehlermeldung 


$9/9 flopwr (s.o.) 

Diese Funktion entspricht genau der oben beschriebenen, nur 
daß hier die Diskettensektoren geschrieben werden. 
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$0A/10 flopfmt (s.u.) 

Formatieren einer Spur auf der Diskette. Die zu übergebenden 
Parameter sind: 


Puffer.L 

Filler.L 

Drive 

Spt 

Track 

Seite 

Interleave 

Magic.L 

Virgin 


Spurdaten -> 9 Sektoren min. 8 KByte 
unbenutzt 

Laufwerk: 0=A, 1=B 
Sektoren je Spur (9) 

Spurnummer 0-79 oder 0-39 
Diskettenseite 0/1 
Reihenfolge des Beschreibens (1) 
Konstante: $87654321 
Schreibe-Wert (üblich: $E5E5) 


S0C/12 midiws (Anzahl, Zeiger.L) 

Mit "midiws" kann eine Datenkette an den MIDI-Ausgang aus¬ 
gegeben werden. Die "Anzahl" bezeichnet die Länge-1 in Bytes, 
der "Zeiger" weist auf die zu sendenden Daten. 


$0D/13 mfpint (Nummer, Vektor.L) 

Eine Interruptroutine im MFP wird initialisiert. Die Vektor¬ 
nummer steht in "Nummer", der "Vektor" zeigt auf die neue 
Routine. 


$0E/14 iorec (Device) 

Man erhält einen Zeiger auf den Puffer-Datensatz für das mit 
"Device" bestimmte Eingabegerät: 


0 

1 


RS232 

Tastatur 2 = MIDI 
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Der Aufbau des Puffers ist folgender: 


ibuf.L 

ibufsize.W 

ibufhd.W 

ibuftl.W 

ibuflow.W 

ibufhi.W 


Zeiger auf Eingabebuffer 
Größe des Eingabebuffers 
Kopfindex 
Schlußindex 

untere Überlaufmarkierung 
obere Überlaufmarkierung 


$0F/15 


rsconf (s.u.) 


Die Konfiguration der RS232-Schnittstelle kann mit dieser 
Funktion eingestellt werden. Die Parameter sind folgende: 

Baud Übertragungsgeschwindigkeit 

Ctrl Kommunikations-Parameter 

Ucr USART Register in MFP 

Rsr Empfangs-Status Register MFP 

Tsr Übermittlungs-Status Reg. MFP 

Scr Synchron Character Reg. MFP 


Der in "Baud" angegebene Wert zur Einstellung der BAUD-Rate 
bedeutet: 


0 

19200 

5 

2000 

10 

200 

1 

9600 

6 

1800 

11 

150 

2 

4800 

7 

1200 

12 

134 

3 

3600 

8 

600 

13 

110 

4 

2400 

9 

300 

14 

75 


$10/16 keytbl (Unshift.L, Shift.L, CapsLock.L) 

Mit "keytbl" kann man die Tastatur neu belegen. Die drei Zeiger 
weisen auf je eine Tastaturtabelle von 128 Bytes: 

Unshift.L Zeiger auf Tastatur-Tabelle norm. 

Shift.L Zeiger auf Tastatur-Tabelle mit SHIFT 

CapsLock.L Zeiger auf CAPS-LOCK Tastaturtabelle 

Negative Werte (-1) verändern einen Zeiger nicht. 
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$11/17 random () 

Ergibt eine 24-Bit-Zufallszahl (Bits 24-31 erhalten eine Null) in 


DO. 


$12/18 

protobt (Zeiger.L, Nummer.L, Typ, Flag) 


Diese Funktion erzeugt einen Prototyp-Boot-Sektor. Die Para¬ 
meter haben folgende Bedeutungen: 


Puffer.L 

Pufferadresse für den 512-Byte-Boot-Sektor 

Nummer.L 

24-Bit-Seriennummer 

Typ 

Diskettentyp: 

0 = 40/SS 

1 = 40/DS 

2 = 80/SS 

3 = 80/DS 

Flag 

Ausführbarkeits-Flag: 

0 = nicht auführbar 

1 = ausführbar 

2 unverändert 

$13/19 

Eine Reihe 

flopver (s.u.) 

Diskettensektoren können hierdurch mit dem 


Speicher verglichen werden. Übergeben werden dafür folgende 


Parameter: 


Puffer.L 

Filler.L 

Drive 

Sector 

Track 

Seite 

Count 

Adresse des Puffers 
unbenutzt 

Laufwerk: 0=A, 1=B 

Sektornummer 

Spurnummer 

Diskettenseite 0..1 

Anzahl der Spuren 
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In DO erhält man entweder eine Null (alle Sektoren OK) oder 
einen Fehlercode. Im Fehlerfall findet man dann eine Liste der 
Sektoren mit abweichendem Inhalt, abgeschlossen durch eine 
Null. 


$14/20 scrdmp () 

Erzeugt eine Hardcopy mittels der voreingestellten Schnittstel¬ 
len- bzw. Drucker-Optionen (wie Alternate + Help). 


$15/21 


cursconf (Funktion, Tempo) 


Die Erscheinungsweise des Cursors kann hiermit gesetzt werden. 
Die "Funktion" kann folgende Werte annehmen: 


0 Cursor aus 

1 Cursor an 

2 blinken 

3 nicht blinken 

4 Blinkrate setzen 

5 ... holen 


Das "Tempo" bestimmt bei Funktion 4 die Blinkrate des Cursors 
in 1/70 Sek. (Monochrom) bzw. 1/50 Sek. (Farbmonitor). Die 
alte Blinkrate wird bei Funktion 5 in DO zurückgegeben. 


$16/22 settime (Zeit.L) 

Datum und Uhrzeit der internen Uhr werden mit dieser Funk¬ 
tion gesetzt. Im Parameter "Zeit" wird dabei im LO-Wort die 
Uhrzeit und im Hl-Wort das Datum übergeben. Diese Worte 
setzen sich folgendermaßen zusammen: 
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Bits Inhalt 


0-4 

Sekunden (2er-Schritte) 

5 - 10 

Minuten (0-59) 

11 - 15 

Stunden (0-23) 

16 - 20 

Tag (1-31) 

21 - 24 

Monat (1-12) 

25 - 31 

Jahr minus 1980 (0..119) 

$17/23 

gettime () 

Es werden Datum und Uhrzeit der internen Uhr ausgelesen und 
im Langwort DO zurückgegeben. Die Bitbelegung dieses Rück¬ 
gabeparameters entspricht derjenigen bei "settime". 


$18/24 bioskeys () 

Stellt die ursprüngliche Tastaturbelegung wieder her, nachdem 
sie mit der keytbl-Funktion geändert wurde. 


$19/25 ikbdws (Anzahl, Zeiger.L) 

Mit dieser Funktion können Befehlsseqenzen in Form eines 
Strings an den Tastaturprozessor übermittelt werden. Der Zeiger 
weist auf diese Befehlssequenz, "Anzahl" gibt die Stringlänge -1 
an. 


$lA/26 jdisint (Nummer) 

Der MFP-Interrupt mit der laufenden Nummer "Nummer" wird 
gesperrt. 


$lB/27 jenabint (Nummer) 

Ein mit "jdisint" gesperrter MFP-Interrupt kann hiermit wieder 
freigegeben werden. 
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$lC/28 giaccess (Daten, Register) 

Diese Funktion ermöglicht einen direkten Zugriff auf ein 
Register des Gl-Soundchips. Die Registernummer (0-15) wird in 
"Register" angegeben, das dort ggf. einzutragende Byte in 
"Daten". Bit 7 von "Register" hat eine besondere Funktion: ist es 
0, so wird der Registerinhalt nur ausgelesen, ist es 1, so wird 
der neue Wert dort eingetragen. 


$lD/29 offgibit (Maske) 

Die Bits im Port A des Soundchips können hiermit wahlweise 
gelöscht werden. Dabei werden alle die Bits gelöscht, deren 
korrespondierendes Bit in ’Maske’ ebenfalls gelöscht ist. Alle 
anderen Bits bleiben unberührt. 

Die Bedeutungen der einzelnen Bits sind: 

Bit Funktion 

0 Diskette Seite 0/1 selektieren 

1 Diskette Laufwerk A selektieren 

2 Diskette Laufwerk B selektieren 

3 RS232 Sende-Rückfrage 

4 RS232 Fertigmeldung 

5 STROBE (Centronics 

6 General Purpose Output 

7 unbenutzt 


S1E/30 ongibit (Maske) 

Setzen von Bits im Soundchip, Port A. Die Bedeutung der Bits 
wie oben. Es werden alle Bits gesetzt, deren entsprechendes Bit 
in "Maske" gesetzt ist. 
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S1F/31 xbtimer (Timer, Control, Data, Vektor.L) 

Ein Timers des MFP 68901 wird gestartet und ihm eine Inter¬ 
ruptroutine zugeordnet. Die einzelnen Parameter bedeuten: 


Timer 

Control 

Data 

Vektor.L 


Timernummer: A=0, B=l, C=2, D=3 
Kontrollwort für den Timer 
Datenwort für den Timer 
Adresse der Interruptroutine 


$20/32 dosound (Zeiger.L) 

Es wird eine automatische Soundlisten-Abarbeitung gestartet. 
Diese Liste muß in Stringform wie folgt vorliegen: 


$00-$0F Registernummer, Wertbyte folgt 

$80 Argument folgt (laden in temporäres Reg.) 

$81 3 Argumente folgen: 1. = Soundchipregister 

2. = Schrittweite 

3. = Endekriterium 

$82-$FF Argument folgt ( 0 = Unterbrechen >0 = Pause in 
2/100 Sekunden) 


$21/33 setprt (Konfiguration) 

Diese Funktion ermöglicht das Lesen oder Verändern der 
Druckereinstellungen. Dabei bedeutet ein Konfigurations-Wert 
von -1, daß nur ausgelesen werden soll (in DO), ein anderer 
Wert wird übernommen. Die Bits dieses Wertes haben folgende 
Bedeutungen: 

Bit gelöscht gesetzt 


0 Matrix 

1 Farbe 

2 Atari 

3 Normal 

4 Centronics 

5 Endlos 
6-14 Reserviert 

15 0 


Typenrad 

einfarbig 

Epson 

NLQ 

RS232 

Einzelblatt 

Reserviert 

0 
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$22/34 kbdvbase () 

Liefert einen Zeiger zu einer Vektortabelle, in der Adressen von 
Routinen zur Bearbeitung von Tastaturprozessor-Daten einge¬ 
tragen sind. Der Aufbau dieser Vektortabelle ist folgender (alle 
Werte 32 Bit): 


midivec 

vjbderr 

vmiderr 

statvec 

mousevec 

clockvec 

joyvec 


MIDI IN 

Tastaturfehler 

MIDI Fehler 

IKBD Status 

Maus-Routine 

Uhrzeit-Routine 

Joystick-Routine 


$23/35 kbrate (Verzögerung, Wiederholung) 

Auslesen oder ändern der Tastatur-Wiederholungs- und Ver¬ 
zögerungswerte, die alle in 1/50 Sekunden vorliegen. Die "Ver¬ 
zögerung" gilt vom Drücken der Taste bis zu ihrer Wieder¬ 
holung, die "Wiederholung" ist die Zeit, nach der eine gedrückte 
Taste automatisch wiederholt wird. Ist einer der Parameter -1, so 
wird dieser Wert nicht verändert. 

In DO erhält man aus dieser Funktion die alten Werte zurück: in 
Bit 0-7 den Wiederholungs- und in Bit 8-15 den Verzögerungs- 
Wert. 


$24/36 prtblk (Zeiger.L) 

Erzeugt eine Hardcopy mit den Bildschirm- und Drucker¬ 
parametern, wie bei Alternate-Help. Zusätzlich können hier 
noch in der Parameterliste, auf die 'Zeiger’ weist, Einstellungen 
vorgenommen werden. Die Parameterliste hat folgendes 
Aussehen: 


blkprt.L 

width 

height 


Bildschirm-RAM Start offset 
Breite des Bildschirms 
Höhe des Bildschirms 
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left 

right 

scrres Bildschirmauflösung (0 = niedrig, 1 = mittel, 

2 = hoch) 

dstres Druckerauflösung (0..1) 

colpal.L Farbpalette (Zeiger) 

type Druckertyp (0..3) 

port Schnittstelle (0=Centronics, 1=RS232) 

masks.L Halbtönung (Zeiger auf eine Maske) 


$25/37 wvbl() 

Es wird nur auf den nächsten Bildrücklauf (vertikale Synchro¬ 
nisation) gewartet. 


$26/38 supexec (Zeiger.L) 

Es wird die Maschinen-Unterroutine im Supervisor-Modus des 
Prozessors 68000 ausgeführt, auf die der "Zeiger" weist. 


$27/39 puntaes () 

Es erfolgt das Abschalten des AES, falls sich dieses im RAM 
befindet. Eine neue Funktion ist im Blitter-TOS zum XBIOS 
hinzugefügt worden: 


$40/64 Blitmode (Flag) 

Die Einstellung des evtl, eingebauten Blitters kann hiermit aus¬ 
gelesen und verändert werden. Wird in "Flag" -1 übergeben, so 
wird die aktuelle Konfiguration ausgelesen (in DO). Andernfalls 
wird der Flag-Wert als neue Konfiguration übernommen. In 
diesem Flag bzw. im Ergebnis bedeuten die Bits 0 und 1 für den 
Blitter folgendes: 

Bit wenn 0 wenn 1 

0 ausgeschaltet eingeschaltet 

1 nicht vorhanden eingebaut 
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5.4 LINE_A 

Der sonderbare Begriff LINE_A stammt aus einer Besonderheit 
des im ST verwendeten Prozessors MC68000. Innerhalb des 
Befehlssatzes dieser CPU gibt es nämlich zwei Befehlsgruppen, 
welche einen recht sonderbaren Effekt auslösen. Gemeint sind 
dabei alle 16-Bit-Worte, welche entweder mit $A oder mit $F 
beginnen, also $A000-$AFFF und $F000-$FFFF. Tritt ein 
solcher Maschinenbefehl bei der Abarbeitung eines Programmes 
auf, so wird ein Interrupt ausgelöst. Der zur Verzweigung in die 
Interrupt-Routine verwendete Vektor hängt dabei davon ab, ob 
es sich um ein $Axxx- (LINE_A) oder ein $Fxxx-Wort 
(LINE_F) handelt. Diese beiden Vektoren finden sich an den 
Adressen $28 (LINE_A) und $2C (LINE_F). 

Mit Hilfe dieser beiden Pseudobefehlsgruppen wird im ST sehr 
viel gearbeitet. Die LINE_F-Befehlsgruppe ist die größte der 
beiden; hier sind die zentralen AES-Funktionen zusammenge¬ 
faßt. Wegen des sehr großen Umfangs ist es auch nicht ratsam, 
diese Funktionen zu verwenden, da sie über die offiziellen AES- 
Funktionen einfacher zu handhaben sind. 

Anders sieht es bei den LINE_A-Funktionen aus. Sie werden 
für graphische Grundoperationen des VDI verwendet. Dazu ge¬ 
hört das Ziehen von Linien oder Füllen von Flächen ebenso wie 
die Behandlung von Sprites. 

Als Besonderheit ist hier auch zu nennen, daß der im Mega-ST 
eingebaute Blitterchip über diese LINE_A-Funktionen bedient 
wird. Dabei wird über ein internes Flag, welches mit der 
XBIOS-Funktion 64 (Blitmode) manipuliert werden kann, ent¬ 
schieden, ob die Operationen Software- oder hardwaremäßig 
ausgeführt werden. Die LINE_A-Routinen sind also der eigent¬ 
liche Schlüssel zum Blitter! 

Die Programmierung der LINE_A-Routinen ist eigentlich dem 
Assembler-Programmierer vorenthalten. Dennoch gibt es bereits 
verschiedene Link-Files für C-Compiler, mit denen dies auch 
C-Programmen zugänglich wird. 
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In Assembler gibt es nun zwei Möglichkeiten, eine LINE_A 
oder auch LINE_F-Routine aufzurufen. Der übliche Weg ist 
der, in dem Programm die Zeile 

dc.w $A000 

einzusetzen, um, wie in diesem Beispiel, die LINE_A-Routine 0 
aufzurufen. Einige Assembler haben allerdings diesen recht un¬ 
schönen Umweg nicht nötig; hier gibt es zwei eigene Pseudo- 
Mnemonics. Im Assembler K-SEKA lauten diese: 

LINE A n 


und 


LINE_F n 

An der Stelle des "n" wird dann der Funktionswert eingetragen, 
für das Beispiel wäre dies LINE_A 0. 

Beginnen wir die Programmierung der LINE_A-Routinen mit 
einem sehr einfachen Beispiel. Die LINE_A-Funktionen 9 und 
10 dienen dazu, den Mauszeiger ein- und auszuschalten. So 
können Sie also auch in einem TOS-Programm die Maus ver¬ 
wenden, wenn Sie einfach LINE_A 9 einsetzen. Mit LINE_A 
10 wird er dann wieder abgeschaltet. 

Doch auch die LINE_A-Funktionen, so einfach sie aufgerufen 
werden können, benötigen für ihre Arbeit meist eine Reihe 
Parameter. So auch die oben genannten Maus-Funktionen, 
welche aber prinzipiell auch so funktionieren. Betrachten wir 
nun die Methode der Parameterübergabe an die LINE_A-Funk- 
tionen. 

Für diesen Zweck ist bereits nach dem Einschalten des Rechners 
ein Variablenfeld im Speicher eingerichtet. Dazu kommen noch 
5 Arrays, welche nicht zufällig an die VDI-Arrays erinnern: 
Contrl, Intin, Intout, Ptsin und Ptsout. Die Übereinstimmung hat 
hauptsächlich den Grund, daß das VDI sehr starken Gebrauch 
von den LINE_A-Routinen macht. Die Felder sind also tatsäch¬ 
lich die gleichen. 
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Wie findet man diese Felder nun im Speicher? Dieses Problem 
löst die erste LINE_A-Funktion: LINE_A 0. Dieser Funktion 
brauchen keine Parameter übergeben zu werden, sondern sie gibt 
einige zurück. 


LINE A 0 

Diese Funktion liefert in DO, A0, Al und A2 einige wichtige 
Zeiger zurück: 

A0 und DO enthalten nach der Rückkehr die Adresse des 
LINE_A-Variablenfeldes. 

Al zeigt auf eine Tabelle mit drei Einträgen, und zwar die 
Adressen der drei Fonts 6x6, 8x8 und 8x16. 

A2 weist auf den Beginn der Tabelle, in der die 15 Startadressen 
der LINE_A-Funktionen 0-15 liegen. Alle weiteren LINE_A- 
Funktionen, also 16-4095, werden übrigens ignoriert. 

Die üblichen Werte, welche hier im Mega-ST geliefert werden, 
sind: 


A0/D0 S00299A 

Al SFC9FE4 

A2 $FC9FA4 

Die drei Einträge in der Tabelle der Fontheader-Adressen sind 
dann: 


SFD3A50 6x6-Font 

SFD412C 8x8-Font 

SFD5B88 8xl6-Font 


Ab der Adresse $299A (10650) liegen also im Mega-ST die 
LINE_A-Variablen. Dieses Variablenfeld hat folgenden Aufbau: 



0 

2 

4 

8 

12 

16 

20 

24 

26 

28 

30 

32 

34 

36 

38 

40 

42 

44 

46 

50 

52 

54 

56 

58 

60 

62 

64 

66 

68 

70 

72 

74 
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Name 


Funktion 


v_planes 

Anzahl Bitplanes 

v lin wr 

Bytes pro Scanzeile 

CONTRL 

Zeiger auf CONTRL- 
Array 

INTIN 

Zeiger auf INTIN-Array 

PTSIN 

Zeiger auf PTSIN-Array 

INTOUT 

Zeiger auf INTOUT- 
Array 

PTSOUT 

Zeiger auf PTSOUT-Array 

FG BP 1 

Farbwert der Plane 0 

FG BP 2 

Farbe PLane 1 

FG BP 3 

Farbe Plane 2 

FG BP 4 

Farbe Plane 3 

LSTLIN 

H) 

LN MASK 

Linienmuster (s. $A003) 

_WRT_MODE 

Zeichenmodus (Replace, 
Transparent...) 

XI 

Anfangskoordinate X 

Y1 

Anfangskoordinate Y 

X2 

Endkoordinate X 

_Y2 

Endkoordinate Y 

_patptr 

Zeiger auf Füllmuster (s. 
$A004) 

_patmsk 

Mustergröße-1 

_multifill 

(0/1) Füllmuster für Mul¬ 
tiplane! 

CLIP 

Clipping-Flag (s. SA005) 

XMN CLIP 

Clipping links oben, X 

YMN CLIP 

und Y 

XMX CLIP 

Clipping links unten, X 

YMX CLIP 

und Y 

XACC DDA 

($8000) 

DDA INC 

Vergrößerungsfaktor 

T SCLSTS 

1: Vergrößerung 

MONO STATUS 

1: kein Proportional-Font 

SOURCEX 

Zeichenposition im Font 

SOURCEY 

(0) 

DESTX 

X-Zeichenposition auf 
dem Bildschirm 
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78 

DESTY 

80 

DELX 

82 

DELY 

84 

FBASE 

88 

FWIDTH 

90 

STYLE 

92 

LITEMASK 

94 

SKEWMASK 

96 

WEIGHT 

98 

_R_OFF 

100 

_L_OFF 

102 

SCALE 

104 

_CHUP 

106 

_TEXT_FG 

108 

_scrtchp 

112 

scrpt2 

114 

TEXT BG 

116 

COPYTRAN 

118 

FILL ABORT 


Y-Zeichenposition 

Zeichenbreite 

Zeichenhöhe 

Zeiger auf Fontdaten 

Fontform-Breite 

Stil-Flags (s. $A008) 

Maske zum Schattieren 

Maske für Kursivschrift 

Anzahl Verbreiterungsbits 

Offset für Kursivschrift 

rechts 

Offset für Kursivschrift 
links 

1: Vergrößerung! 
Textdarstellungs-Winkel 
(Grad* 10) 

Text-Farbe 

Zeiger auf Effekte-Puffer 
($40) 

Textfarbe (Hintergrund) 
Transparent-Copy-Flag 
Zeiger auf Routine für 
Fill-Abbruch 


Die Anwendung der einzelnen Variablen obiger Liste hängt von 
der aufgerufenen LINE_A-Funktion ab. Hier nun eine Über¬ 
sicht über die einzelnen LINE A-Routinen: 


LINE A 0 

Initialisierung und Ermitteln der LINE_A-Betriebsparameter 
(s.o.) 

LINE_A 1 Bildpunkt setzen 

Setzen eines Bildschirmpunktes. Koordinaten in Ptsin(O) und 
Ptsin(l), Farbe in Intin(O). 
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LINE_A 2 Bildpunkt testen 

Farbe des Bildpunktes an den Koordinaten Ptsin(O) / Ptsin(l) 
testen und in DO zurückgeben. 


LINE_A 3 Linie ziehen 

Ziehen einer Linie zwischen den Koordinaten _X1/_Y1 und 
_X2/_Y2. In _LN_MASK wird das Bitmuster der Linie ein¬ 
getragen. (Beispiel s.u.) 


LINE_A 4 horizontale Linie ziehen 

Zwischen den Koordinaten _X1/_Y1 und _X2/_Y1 wird eine 
horizontale Linie gezogen. Es werden der Reihe nach die 
Musterwerte verwendet, auf die "_patptr" zeigt und deren 
Anzahl-1 in "_patmsk" steht. (Beispiel s.u.) 


LINE_A 5 gefülltes Rechteck zeichnen 

Es wird ein gefülltes Rechteck von _X1/_Y1 nach _X2/_Y2 
gezeichnet. Das verwendete Füllmuster liegt ab (_patptr) und ist 
_patmsk Worte groß. Des weiteren wird hierbei ein ggf. 
definierter und in _CLIP eingeschalteter Clip-Ausschnitt be¬ 
achtet, d.h. nur in diesem Clip-Rechteck wirklich gezeichnet. 


LINE_A 6 gefülltes Vieleck zeichnen 

Es wird ein Vieleck gezeichnet, dessen Koordinaten in Ptsin() 
liegen (Anzahl in Contrl(l)), und mit dem definierten Füllmuster 
gefüllt. 


LINE_A 7 Bitbereich mit einem anderen verknüpfen 

Diese Funktion wird häufig vom GEM verwendet. Sie verschiebt 
bzw. kopiert in verschiedenen Modi einen Bitblock in einen 
anderen. Dies wird je nach Blitter-Flag entweder Software- oder 
hardwaremäßig erledigt. Das Adreßregister A6 muß beim Aufruf 
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auf einen 76 Bytes langen Parameterblock zeigen, in dem die 
diversen Parameter definiert werden. Für eine eingehende Er¬ 
klärung dieser Parameter und deren Verwendung verweise ich 
auf die entsprechenden Kapitel im ST-Intern-Buch. 


LINE_A 8 Grafik-Text-Ausgabe 

Diese Funktion, welche auch die LINE_A 7-Funktion mitver¬ 
wendet, sorgt für die Ausgabe von Grafik-Text auf dem Bild¬ 
schirm. Auch hier wird eine große Anzahl Parameter verlangt, 
so daß ich empfehle, anstelle dieser Funktion auf die ent¬ 
sprechende VDI-Funktion zurückzugreifen. 


LINE_A 9 Mauszeiger einschalten 

Der Mauszeiger wird sichtbar gemacht. Wird in Intin(O) ein Wert 
<>0 übergeben, so muß diese Funktion so oft aufgerufen wer¬ 
den, wie vorher die LINE_A-Funktion 10 verwendet wurde, da 
dies mitgezählt wird. 


LINE_A 10 Mauszeiger ausschalten 

Der Mauszeiger wird vom Bild entfernt. Die Anzahl der Aufrufe 
dieser Funktion wird mitgezählt (s. LINE_A 9). 


LINE_A 11 Mauszeiger neu setzen 

Die Form des Mauszeigers und seiner unterlagerten Maske kann 
hiermit neu gesetzt werden. Dazu muß in Intin(3) die Farbe der 
Maske und in Intin(4) die des Zeigers selbst eingetragen werden. 
Außerdem werden in Intin(5)-(20) 16 Worte mit den Masken¬ 
daten und in Intin(21)-(36) 16 Worte mit den Zeigerdaten 
erwartet. 
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LINE_A 12 Sprite löschen 

Ein zuvor mit LINE_A 13 gezeichnetes Sprite wird wieder vom 
Bildschirm entfernt. In A2 muß dafür ein Zeiger übergeben 
werden, welcher auf den Puffer mit den geretteten Hintergrund¬ 
daten weist. 


LINE_A 13 Sprite zeichnen 

Es wird an den in DO und Dl enthaltenen Bildschirm-Koordi¬ 
naten ein Sprite gezeichnet, auf dessen Definitionsblock A0 
zeigt. A2 muß dafür auf einen 10 + 64 * Anzahl_Planes Puffer 
zeigen, in dem der Hintergrund gerettet werden kann. Der 
Definitionsblock des Sprite muß folgendermaßen aufgebaut sein: 


Wort 

Inhalt 

1 

X-Offset zum Aktionspunkt (Hot Spot) 

2 

Y-Offset zum Aktionspunkt 

3 

Flag: 0:VDI-Format, l:XOR-Format 

4 

Hintergrund-Farbe 

5 

Vordergrund-Farbe 

6 

Hintergrund-Muster Zeile 0 

7 

Vordergrund-Muster Zeile 0 

8 

Hintergrund-Muster Zeile 1 

9 

Vordergrund-Muster Zeile 1 

usw... 


LINEA 14 

Bildschirmbereich kopieren 


Ähnlich zur LINE_A 7-Funktion wird hier ein Bitblock ver¬ 
schoben bzw. kopiert, nur daß dieser hier bevorzugt im Bild¬ 
bereich liegt. 


LINE A 15 Fläche füllen 

Es wird die Fläche gefüllt, die den in Ptsin(O) und Ptsin(l) Ko¬ 
ordinatenpunkt umhüllt. In Intin(O) wird hierfür der Füllmodus 
übergeben: Ist er positiv, so wird vom Startpunkt aus bis zum 
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Bildrand bzw. einer Umrandung in der im Modus stehenden 
Farbe gefüllt. Ist er negativ, so wird die gesamte Fläche bis zum 
Bildrand oder einer Umrandung irgendeiner anderen Farbe ge¬ 
füllt. 

Hier nun zwei einfache Beispiele der Programmierung von 

LINE_A-Routinen. Das erste Programm zeichnet zwei Linien¬ 
blöcke mit der LINE_A 3-Funktion. Das zweite zeichnet eben¬ 
falls Linien, jedoch horizontale mit der LINE_A 4-Funktion. 
Sie können daran leicht den Geschwindigkeits-Unterschied 
dieser beiden Funktionen erkennen. Die Routinen sind übrigens 
für Monochrom-Betrieb gedacht. 

;*** LINE_A 3-Demonstration *** 

;** Konstanten: ** 
xl = 38 

yl = 40 ;Anfangskoordinaten 

x2 = 42 


y2 = 44 

;Endkoordinaten 


colorO = 24 

colorl = 26 

;Linienfarben 


maske = 34 

;Linienmaske 


modus = 36 

;Zeichenmodus 


run: 

LINE_A 

0 

;Initialisierung 

;* In A0 steht 

nun ein Zeiger auf die Variablen * 

move 

#1,color0(a0) 


move 

#0,color1(a0) 

;Farben setzen 

move 

#3,modus(a0) 

;Zeichenmodus 

move 

#$eeee,maske(aO) 

move 

#1,x1(aO) 

;Anfangsposition X 

move 

#200,y1(a0) 

;und Y 

move 

#639,x2(a0) 

;Endposition X 

move 

#400,y2(a0) 

;und Y move. 
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loop: 


loopl: 


LINEA 

3 

sub 

#2,y2(a5) 

bne 

loop 

move 

#200,y2(a5) 

move 

#400,y1(a5) 

LINE_A 

3 

sub 

#2,y1(a5) 

bne 

loopl 

rts 



;Linie zeichnen 


;Linie zeichnen 


;*** lINE_A 4-Demonstration *** 
;** Konstanten: ** 


xl = 38 
yl = 40 
x2 = 44 
colorO = 24 
colorl = 26 
maske = 34 
modus = 36 
patptr = 46 
patmask= 50 


;Anfangskoordinaten 
;Endkoordinate 

;Linienfarben 
;Linienmaske 
;Zeichenmodus 
;Zeiger auf Muster 
;Anzahl der Musterworte-1 


run: 


LINE_A 

0 

;Initialisierung 

1 steht 

nun ein Zeiger auf die Variablen * 

move 

move 

move 

#1,color0(a0) 
#0,color1(a0) 

#1,modus(a0) 

;Farben setzen 
;Zeichenmodus 

move.1 

move 

#pattern,patptr(aO) 

#1,patmask(aO) ;2 Maskenworte vorhanden 

move 

move 

move 

#0,x1(a0) 

#319,y1(a0) 

#639,x2(a0) 

;Anfangsposition X 
;und Y 

;Endposition X 

move.1 

a0,a5 
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loop: 

LINE_A 4 ;horizontale Linie ziehen 

subq #1,x2(a5) 

addq #1,x1(a5) ;Koordinaten ändern 

subq #1,y1(a5) 

bne loop 

rts 

pattern: 

dc.w %1100110011001100 

dc.w %0011001100110011 


5.5 GEM-VDI 


Wir begeben uns nun zu einem etwas umfangreicheren Thema: 
der Programmierung des Grafik-Paketes GEM (Grafic Environ¬ 
ment Manager). Dieses unterteilt sich in zwei unterschiedliche 
Teile: 


VDI (Virtual Device Interface) und 

AES (Application Environment System) 

Das VDI beinhaltet alle grundlegenden Grafik-Funktionen wie 
etwa Linien und Kreise zeichnen oder Textausgabe. Diese Funk¬ 
tionen werden vom AES ebenfalls verwendet, welches die Be¬ 
nutzerführung erledigt. Dazu gehören neben Menü- und 
Fenster-Funktionen auch die Bearbeitung von Accessories. 

Der eigentliche Witz dabei ist der, daß das VDI als virtueller 
Gerätetreiber theoretisch alle möglichen Ausgabegeräte bedienen 
kann. Für die Programmierung spielt es dabei keine Rolle, ob 
die gewünschte Linie auf dem Bildschirm oder einem Plotter 
ausgegeben werden muß. Die dafür völlig unterschiedlichen 
eigentlichen Arbeitsgänge werden dem Programmierer somit vom 
VDI abgenommen. 

Damit das VDI bei einem Aufruf weiß, welches Gerät nun dran 
ist, wird es zu Beginn der Arbeit für jedes Gerät einmal initia¬ 
lisiert. Diese Initialisierung liefert dann einen Wert zurück, 
welcher bei jedem weiteren Aufruf angegeben werden muß, der 
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dieses Gerät betrifft. Diese Kennzahl, die für das VDI den 
Schlüssel zu einem Gerät darstellt, wird Handle genannt. 

Beginnen wir nun mit der Programmierung des VDI. Der Aufruf 
des GEM geschieht wie beim GEMDOS über einen TRAP-Be- 
fehl, und zwar TRAP #2. Die Unterscheidung, ob nun VDI oder 
AES gemeint ist, wird durch das Register DO getroffen: enthält 
es beim Aufruf den Wert $73, so ist das VDI gemeint, der Wert 
$C8 meint AES. 

Die Übergabe von Parametern geschieht nun auf eine völlig 
andere Art und Weise als beim GEMDOS. Es werden zu Beginn 
der Arbeit mit VDI oder AES einige Parameterfelder im 
Speicher festgelegt und dem System angemeldet. In diese Felder 
werden dann vor jedem Aufruf die Funktionsnummer (auch 
Opcode genannt) sowie die nötigen Parameter eingetragen; 
eventuelle Rückgabewerte finden sich ebenfalls in diesen Fel¬ 
dern. Aus diesem Grund reicht es nicht mehr aus, lediglich die 
Funktion mit einer Parameterliste aufzurufen, sondern es müssen 
die Felder vorbereitet werden. Die Namen dieser Felder sind 
folgende: 

Contrl: Hier wird die Funktionsnummer sowie die Handle 


des angesprochenen Gerätes eingetragen. 


Intin: 


In dieses Feld werden die eigentlichen Funktions- 
Parameter eingetragen. 


Intout: 


In diesem Feld liegen nach einer Funktion even¬ 
tuelle Rückgabe-Parameter. 


Ptsin: 


Falls die Funktion Koordinaten erfordert, so wer¬ 
den diese hier eingetragen. 


Ptsout: 


Hier werden eventuelle Koordinaten zurückge¬ 
liefert. 
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Die Anfangsadressen dieser Felder werden in einer weiteren 
Tabelle eingetragen. Die Adresse dieser Tabelle wird dann dem 
VDI beim Aufruf über den TRAP #2-Befehl im Datenregister 
Dl übergeben. 

Die Programmierung des VDI in einer Sprache wie GFA-BASIC 
ist eigentlich nicht der Rede wert. Um beispielsweise ein ge¬ 
fülltes Rechteck auf den Bildschirm zu zaubern, muß lediglich 
der Befehl PBOX mit den entsprechenden Parametern ge¬ 
schrieben werden. Betrachten wir daher nun ein Maschinenpro¬ 
gramm, das diesem PBOX-Befehl entspricht, also auch ein ge¬ 
fülltes Rechteck zeichnet: 

.*★*** einfache VDI-Demonstration: Rechteck zeichnen ***** 

run: 


bsr 

graf_handle ;Handle ermitteln (1) 

bsr 

open_vwork ;VDI initialisieren 

bsr 

filled_bar ;Rechteck zeichnen 

rts 

;** Unterprogramme ** 

graf_handle: 

;* Bildhandle ermitteln (1) * 

move 

#77 # contrl 

clr 

contrl+2 

move 

#5,contrl+4 

clr, l 

contrl+6 

bsr 

aes ;AES aufrufen 

move 

rts 

intout,handle ;Handle retten 

open_vwork: 

;* virtuelle Workstation öffnen * 

move 

#100,contrl ;Opcode: 100 

move 

handle,contrl+12 

Lea 

intin,a5 

move 

#9,d0 
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olop: 


move 

#1,(a5)+ 

dbra 

dO,olop 

move 

#2,intin+20 

bra 

vdi 

bar: 

moveq 

#2,d0 

move 

#23,contrl 

bsr 

set_it 

moveq 

#1 ,d0 

move 

#25,contrl 

bsr 

set it 


INTIN mit '1* füllen 


Raster-Koordinaten 
VDI aufrufen 

* gefülltes Rechteck zeichnen * 

punktieren 

set_interior 

in Objektfarbe (schwarz) 
set color 


v_bar: 

move 

move 

clr. I 

clr 

move 

move 

move 

move 

move 

move 

bra 


;* Rechteck zeichnen * 
#11,contrl ;Opcode: 11 
#2,contrl+2 
contrl+4 
contrl+8 

#1,contrl+10 ;Funktionskennung: 1 
handle,contrl+12 
#50,ptsin ;X oben 
#30,ptsin+2 ;Y oben 
#150,ptsin+4 ;X unten 
#200,ptsin+6 ;Y unten 
vdi 


setit: 

clr 

move 

move 

move 

move 


;* Einstellung vornehmen * 

contrl+2 
#1,contrl+6 
#2,contrl+8 
handle,contrl+12 

dO,intin ;Wahlparameter einsetzen 


vdi: 

move.l #vdipb,d1 

move #$73,dO 

trap #2 ;VDI aufrufen 

rts 

aes: 

move.l #aespb,d1 

move #$c8,d0 

trap #2 

rts 


AES aufrufen 
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;** Tabellen ** 

vdipb: dc.l contrl,intin,ptsin,intout.ptsout 

aespb: dc.l contrl,global,int in,intout,addrin,addrout 

;** Datenbereich ** 

data 

contrl: blk.w 11 
global: blk.l 8 
intin: blk.w 80 

ptsin: blk.w 80 

intout: blk.w 80 
ptsout: blk.w 80 
addrin: blk.w 80 
addrout: blk.w 80 

handle: blk.w 1 

Dieses Programm zeigt den vorgeschriebenen Weg, um eine 
VDI-Funktion aufzurufen. Da jedoch das Desktop bereits einige 
grafische Ausgaben vorgenommen hat, ist das VDI eigentlich 
schon initialisiert. Wenn Sie also für "Handle" den festen Wert 1 
einsetzen, welcher üblicherweise den Bildschirm repräsentiert, 
können Sie in obigem Programm sowohl den graf_handle- als 
auch den open_vwork-Aufruf weglassen. Mit diesem, allerdings 
nicht ganz offiziellen, Trick können Sie also das Rechteck mit 
der einen Routine "filled_bar" zeichnen lassen! 

Die nun folgenden Funktionen des GEM-VDI sind mit all ihren 
Parametern für die Programmierung in C vorgegeben. As¬ 
sembler-Programmierer müssen jedoch die selben Parameter in 
die gleichen Felder (INTIN usw.) schreiben. Dabei bedeutet die 
C-Definition INT Wortbreite und LONG Langwortbreite des je¬ 
weiligen Parameters. Danach wird mit der Adresse des VDI- 
Parameterblocks im Register Dl und dem Wert $73 in DO über 
den Befehl TRAP #2 das VDI aufgerufen. Der in Contrl(0) 
einzutragende Opcode wird jeweils neben dem Funktionsnamen 
angegeben (OP:n). 
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Bei einigen Funktionen werden immer die gleichen Parameter 
übergeben bzw. übernommen. Dies ist durch die Angabe der 
Parameter als Standard gekennzeichnet. Diese Standard-Para¬ 
meter sind 

für die Eingabe für die Ausgabe 

contrl(O) Operationskode (OP) contrl(2) 0 

contrl(l) 0 contrl(4) 0 

contrl(3) 0 

contrl(6) Handle 


Kontroll-Funktionen 


OPEN WORKSTATION OP: 1 

Laden eines Gerätetreibers für ein Ein- oder Ausgabegerät. 
ATARI ST hat keine solchen Treiber, deshalb ist die Funktion 
(augenblicklich) noch nicht anzuwenden. 


Eingabeparameter: 


intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 

intin(6) 

intin(7) 

intin(8) 

intin(9) 

intin(lO) 


Zu ladender Treiber 
Linientyp 

Farbe Linienoperation 

Markierungstyp 

Markierungsfarbe 

Zeichensatz 

Schriftfarbe 

Fülltyp 

Index des Musters 

Füllfarbe 

Koordinatenflag 

0 = Normal 

1 = res. 

2 = Raster 
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Ausgabeparameter: 

intout(O) Rasterbreite in Pixel 


intout(l) 

intout(3) 

intout(4) 

intout(5) 

intout(6) 

intout(7) 

intout(8) 

intout(9) 

Rasterhöhe in Pixel 

Pixelbreite in 1/I000mm 
Pixelhöhe in 1/1000mm 
Schriftgrößen, Anz. 
Linientypen, Anz. 
Linienbreiten, Anz. 
Markierungsarten, Anz. 
Markierungsgrößen, Anz. 

0 = >32767 

1 = 2 > 

2 = Anzahl 

intout(lO) 

intout(ll) 

Geräte-Zeichensätze, Anz. 
Muster, Anz. 

1 = Tastatur 

2 = Maus + 1 

intout(l2) 

intout(l3) 

Schraffiertypen, Anz. 

Farben, Anz. 

1 = Tastatur 

2 = andere 

intout(l4) 

intout(15) 

intout(24) 

Grafik-Grundfunktionen, Anz. 

bis 

Unterstützende Grafikfunkt. 

1 = Funktions- 

2 = andere 

intout(34) 

intout(35) 

intout(36) 

intout(37) 

infcout(38) 

intout(39) 

intout(40) 

intout(41) 

intout(42) 

intout(43) 

Grundfunktionen-Attribute 

Farbdarstellung 0/1 
Textrotation 0/1 
ausgef. Bereiche 0/1 
cell_Array-Funkt. 0/1 
verfügbare Farben 0/n 

Grafik-Cursor 1/2 
wertverändernde Eingab. 

Auswahltasten 

alphanum. Eingabe 



270 


Das große Mega-ST-Buch 


Geräteart 

0 = Ausgabe 

1 = Eingabe 

2 = Ein+Ausgabe 

3 = reserviert 

4 = Metafile 


ptsout(O) 

min. Zeichenbreite 

ptsout(l) 

min. Zeichenhöhe 

pt80Ut(2) 

max. Zeichenbreite 

ptsout(3) 

max. Zeichenhöhe 

pt8out(4) 

min. Zeilenbreite 

ptsout(5) 

0 

ptsout(6) 

max. Zeilenbreite 

ptsout(7) 

0 

ptsout(8) 

min. Markierungsbreite 

ptsout(9) 

min. Markierungshöhe 

ptsout(lO) 

max. Markierungsbreite 

ptsout(ll) 

Zugriff 

max. Markierungshöhe 


C int work_in[l2]; 

int work_out[57]; 
int handle; 

v_opnwk(work_in, «^handle, work_out); 


intout(44) 


CLOSE WORKSTATION OP: 2 

Schließen eines mit OPEN WORKSTATION geöffneten Arbeits¬ 
gerätes. Auf dem ST zur Zeit noch nicht einsetzbar. 

Eingabeparameter: 

Standard 


Ausgabeparameter: 

contrl(2) ptsin-Punkte, Anz. 

contrl(4) intout-Arraylänge 
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Zugriff 

C int handle; 

v_clswk(handle) 


OPEN VIRTUAL SCREEN WORKSTATION OP: 100 

Öffnen des Bildschirms als Workstation. Für alle Bildschirm- 
Anwendungen erforderlich. 

Eingabeparameter: 


intin(O) 

Zu ladender Treiber 

intin(l) 

Linientyp 

intin(2) 

Farbe Linienoperation 

intin(3) 

Markierungstyp 

intin(4) 

Markierungsfarbe 

intin(5) 

Zeichensatz 

intin(6) 

Schriftfarbe 

intin(7) 

Fülltyp 

intin(8) 

Index des Musters 

intin(9) 

Füllfarbe 

intin(lO) 

Koordinatenflag 

0 = Normal 

1 = res. 

2 = Raster 


Ausgabeparameter: 

intout(0..44) entsprechend Ihrer Monitorversion 

ptsout(0..1l) entsprechend Ihrer Monitorversion 

Zugriff 

C int work_in[l2] 
int work_out[57] 
int handle; 
appl_init() 

v_openvwk(work_in,&handle,work_out) 


Bemerkungen: Siehe —» appl_init. 

Es wird automatisch CLEAR WORKSTATION durchgeführt. 
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CLOSE VIRTUAL SCREEN WORKSTATION OP: 101 

Das Ausgabegerät wird geschlossen. Weitere Ausgaben sind 
danach nicht mehr möglich. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

Standard 

Zugriff 

C int handle; 
appl_exit() 
v_clsvwk(handle) 


CLEAR WORKSTATION OP: 3 

Löscht den Bildschirm bzw. führt ein FORM FEED auf 
Drucker/Plotter aus. Bei einem Metafile wird der Opcode ge¬ 
speichert. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

Standard 

Zugriff 

C int handle; 

v_clrwk(handle) 

Bemerkungen: 

Wird nach Open Virtual Screeb Workstation automatisch durch¬ 
geführt. 
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UPDATE WORKSTATION OP: 4 

Grafikbefehle (für Drucker und Plotter) werden nicht direkt 
ausgeführt, sondern in einem speziellen Puffer gespeichert und 
mit dieser Funktion ausgeführt. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

Standard 


Zugriff 

C int handle; 

v_updwk(handle) 


LOAD FONTS OP:119 

Anfrage, wieviel Zeichensätze auf einem Gerät zur Verfügung 
stehen und Laden dieser Zeichensätze. 

Eingabeparameter: 

intin(O) reserviert (l) 

Ausgabeparameter: 

intout(O) Zusätzliche Zeichensätze, Anzahl 

Zugriff 

C int handle; 

int additional; 
int select; 

additional=vst_load_fonts(handle, select); 

Bemerkungen: 

Beim ST stehen keine weiteren Zeichensätze für den Bildschirm 
zur Verfügung. 
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UNLOAD FONTS OP: 120 

Löscht die geladenen Zeichensätze und stellt somit Speicherplatz 
zur Verfügung (die Standardzeichensätze bleiben erhalten). 

Eingabeparameter: 

intin(O) reserviert 

Ausgabeparameter: 

Standard 

Zugriff 

C int handle; 

int select; (Eingabeparameter) 
vst_unload_fonts(handle, select); 


SET CLIPPING RECTANGLE OP: 129 

Abschalten des Ausschnittes, welcher für begrenzte Ausgaben 
definiert wurde. 


Eingabeparameter: 

intin(O) Ausschnitt 

0 = aus 

1 = ein 

ptsin(O) x-Ordinate obere linke Ecke 

ptsin(l) y-Ordinate obere linke Ecke 

ptsin(2) x-Ordinate untere rechte Ecke 

ptsin(3) y-Ordinate untere rechte Ecke 

Ausgabeparameter: 

keine 


Zugriff 

C int handle; 

int clip_flag; (für intin) 
int pxyarray[4]; (für ptsin) 
vs_clip(handle, clip_flag, pxyarray) 
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Bemerkungen: 

Nach Öffnen des Arbeitsgerätes clip_flag=0. 


Ausgabe-Funktionen 


POLYLINE OP: 6 

Verbinden beliebiger Bildschirmkoordinaten durch eine Linie. 

Eingabeparameter: 

ptsin(O) x-Ordinate des 1. Pixels 

ptsin(l) y-Ordinate des 1. Pixels 

ptsin(n) x-Ordinate des n. Pixels 

ptsin(n+l) y-Ordinate des n+1. Pixels 

Ausgabeparameter: 

Standard 

Zugriff 

C int handle; 

int count; (Anzahl der Koordinaten) 
int pxyarray[2*count] (für ptsin) 
v_pline(handle,count,pxyarray); 


POLYMARKER OP: 7 

Es werden Markierungen auf dem Bildschirm ausgegeben, die 
durch die Attribut-Funktionen festgelegt sind. 


Eingabeparameter: 

ptsin(O) x-Ordinate des 1. Pixels 

ptsin(l) y-Ordinate des 1. Pixels 
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ptsin(n) x-Ordinate des n. Pixels 

ptsin(n+l) y-Ordinate des n+1. Pixels 

Ausgabeparameter: 

Standard 


TEXT OP: 8 

Ausgabe von Text auf dem Grafikbildschirm. Lässt sich in C gut 
anstelle von PRINTF verwenden. Der Text erscheint linksbündig 
an der spezifizierten Position. Mit den Attribut-Funktionen kön¬ 
nen andere Ausgabeformen angegeben werden. Der Ausgabe¬ 
string muß mit ASCII(O) enden (in C Standard). 

Eingabeparameter: 

intin(O-n) Enthält den String in den niederwertigen Bytes. 

ptsin(O) x-Ordinate 

ptsin(l) y-Ordinate 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int x; (ptsin 0) 

int y; (ptsin 1) 

char stringjlänge] (intin) 
v_gtext(handle, x, y, string) 

Bemerkungen: 

Automatische Übertragung String -> intin in C 


FILLED AREA OP: 9 

Ausfüllen der Fläche im Vieleck. Die Definition des Vielecks 
erfolgt durch Übergabe von Koordinaten. Die Art des Füllens 
wird durch Attribut-Funktionen bestimmt. 
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Eingabeparameter: 

ptsin(O) x-Ordinate des 1. Pixels 

ptsin(l) y-Ordinate des 1. Pixels 


ptsin(n) x-Ordinate des n. Pixels 

ptsin(n+l) y-Ordinate des n+1. Pixels 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int count; (Anzahl der Koordinaten) 
int pxyarray[2*count] (ptsin) 
v_fillarea(handle, count, pxyarray) 


CELL ARRAY OP: 10 

Monochrom: Es wird ein Rechteck in der aktuellen Linien¬ 

farbe und Breite gezeichnet. 

Farbe: Es wird ein Rechteck gezeichnet, dieses unter¬ 

teilt in Tabellenform und die Grafikpunkte 
entsprechend ihrer Lage in der Tabelle einge¬ 
färbt. Jedem Tabellenelement wird eine Farbe 
zugeordnet. 


Eingabeparameter: 


contrl(7) 

contrl(8) 

contrl(9) 

contrl(lO) 

intin(O-n) 

ptsin(O) 

pt8in(l) 

ptsin(2) 

ptsin(3) 


Länge der Zeilen in intin 
Farbarrayzonen, Anzahl 
Farbarrayzeilen, Anzahl 
Zeichenmodus (-> Attributf.) 

Farbe jeder Tabellenzone 

x-Ordinate untere linke Ecke 
y-Ordinate untere linke Ecke 
x-Ordinate obere rechte Ecke 
y-Ordinate obere rechte Ecke 
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Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int pxyarray[4] (ptsin) 

int row_lenght; (contrl 7) 

int el_used; (contrl 8) 

int num_rows; (contrl 9) 

int wrt_mode; (contrl 10) 

int colarray[num_row8*el_u8ed) (intin) 

v_cellarray(handle, pxyarray, row_lenght, el_used, num_rows, wrt_mode, 
colarray) 


CONTOUR FILL OP: 103 

Ausfüllen eines Bereichs, der von Punkten gleicher Farbe bzw. 
vom Bildschirmrand begrenzt wird. 

Eingabeparameter: 

intin(O) Füllfarbe 

ptsin(O) x-Ordinate des Füll-Startpixels 

pt8in(l) y-Ordinate des Füll- Startpixels 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int index; (intin) 
int x; (ptsin 0) 
int y; (ptsin 1) 

v_contourfill(handle, x, y, index) 

Bemerkungen: 

Funktion wird nicht von allen Ausgabegeräten unterstützt. 
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FILL RECTANGLE OP: 114 

Ausfüllen eines durch gegenüberliegende Koordinaten 
definierten Rechtecks. 

Eingabeparameter: 

ptsin(O) x-Ordinate obere linke Ecke 

ptsin(l) y-Ordinate obere linke Ecke 

ptsin(2) x-Ordinate untere rechte Ecke 

ptsin(3) y-Ordinate untere rechte Ecke 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int pxyarrayj(ptsin) 
vr_recfl(handle, pxyarray) 


Grafische Grundfunktionen OP: 11 

Die grafischen Grundfunktionen (Linien, Rechtecke, Kreise 
usw.) werden alle unter dem Opcode 11 zusammengefaßt. Die 
Unterscheidung der verschiedenen Funktionen wird durch die 
Funktionskennung (FK) getroffen, welche in Contrl(5), also 
"contrl + 10", eingetragen werden muß. Diese FK wird bei den 
folgenden Funktionen mit angegeben: 


BAR OP: 11, FK: 1 

Die Funktion zeichnet entsprechend den Attribut-Funktionen 
ausgefüllte Balken. 


Eingabeparameter: 

ptsin(O) x-Ordinate obere linke Ecke 

ptsin(l) y-Ordinate obere linke Ecke 
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ptsin(2) x-Ordinate untere rechte Ecke 

ptsin(3) y-Ordinate untere rechte Ecke 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int pxyarray[4] (ptsin) 
v__bar(handle, pxyarray) 


ARC OP: 11, FK: 2 

Zeichnet einen Kreisausschnitt gemäß der spezifizierten 
Anfangs- und Endwinkel. 


Eingabeparameter: 


intin(O) 

intin(l) 

ptsin(O) 

ptsin(l) 

ptsin(2) bis 

ptsin(5) 

ptsin(6) 

ptsin(7) 


Anfangswinkel (0-3600 = 1/lOtel Grad) 
Endwinkel (0-3600 = l/10tel Grad) 

x-Ordinate Mittelpunkt 
y-Ordinate Mittelpunkt 

Enthält 0 (in Assembler zwingend) 
Radius 

Enthält 0 (in Assembler zwingend) 


Ausgabeparameter: 


Standard 


Zugriff: 

C int handle; int x;(ptsin 0) 
int y; (ptsin 1) 
int radius; (ptsin 6) 
int begang; (intin 0) 
int endang; intin 1) 

v_arc(handle, x, y, radius, begang, endang); 

Bemerkungen: 

Funktion wird nicht von jedem Gerät unterstützt. 
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PIE OP: 11, FK: 3 

Zeichnet einen entsprechend den Attribut-Funktionen ausge¬ 
füllten Kreisausschnitt, der durch Anfangs- und Endwinkel 
definiert wird. 


Eingabeparameter: 


intin(O) 

intin(l) 

ptsin(O) 

ptsin(l) 

ptsin(2) bis 

ptsin(5) 

ptsin(6) 

ptsin(7) 


Anfangswinkel (0-3600 = l/10tel Grad) 
Endwinkel (0-3600 = l/10tel Grad) 

x-Ordinate Mittelpunkt 
y-Ordinate Mittelpunkt 

Enthält 0 (in Assembler zwingend) 
Radius 

Enthält 0 (in Assembler zwingend) 


Ausgabeparameter: 

Standard 


Zugriff: 

C int handle; 

int x;(pt8in 0) 
int y;(ptsin 1) 
int radius;(ptsin 6) 
int begang;(intin 0) 
int endang;(intin l) 

v_pieslice(handle, x, y, radius, begang, endang); 

Bemerkungen: 

Funktion wird nicht von jedem Gerät unterstützt. 


CIRCLE OP: 11, FK: 4 

Zeichnet einen ausgefüllten Kreis entsprechend der Einstellung 
durch die Attribut-Funktionen. 


Eingabeparameter: 

ptsin(O) x-Ordinate Mittelpunkt 

pt8in(l) y-Ordinate Mittelpunkt 
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ptsin(2) bis 


ptsin(5) 

ptsin(6) 

ptsin(7) 


Enthält 0 (in Assembler zwingend) 
Radius 

Enthält 0 (in Assembler zwingend) 


Ausgabeparameter: 


Standard 


Zugriff: 

C int handle; 


int x;(ptsin 0) 
int y;(ptsin 1) 
int radius;(ptsin 6) 
v_circle(handle, x, y, radius); 

Bemerkungen: 

Funktion wird nicht von jedem Gerät unterstützt. 


ELLIPTICAL ARC 


OP: 11, FK: 6 


Zeichnet einen elliptischen Ausschnitt entsprechend der einge¬ 
gebenen Anfangs- und Endwinkel und den Attributen, welche 
durch die Attribut-Funktionen spezifiziert werden. 

Eingabeparameter: 


intin(O) 

intin(l) 

ptsin(O) 

ptsin(l) 

ptsin(2) 

ptsin(3) 


Anfangswinkel (0-3600 = l/10tel Grad) 
Endwinkel (0-3600 = l/10tel Grad) 

x-Ordinate Mittelpunkt 
y-Ordinate Mittelpunkt 
x-Radius 
y-Radius 


Ausgabeparameter: 


Standard 
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Zugriff: 

C int handle; 

int x;(ptsin 0) 

int y;(pt8in 1) 

int xradius;(ptsin 2) 

int yradiu8;(ptsin 3) 

int begang;(intin 0), Anfangswinkel 

int endang;(intin 1), Endwinkel 

v_ellarc(handle, x, y, xradius, yradius, begang, endang); 


ELLIPTICAL PIE OP: 11, FK: 7 

Zeichnet einen dem Anfangs- und Endwinkel entsprechenden 
elliptischen, ausgefüllten Ausschnitt unter Berücksichtigung der 
Zeichen-Attribute. 

Eingabeparameter: 

intin(O) Anfangswinkel (0-3600 = 1/lOtel Grad) 

intin(l) Endwinkel (0-3600 = 1/lOtel Grad) 

ptsin(O) x-Ordinate Mittelpunkt 

ptsin(l) y-Ordinate Mittelpunkt 

ptsin(2) x-Radius 

ptsin(3) y-Radius 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int x;(ptsin 0) 

int y;(ptsin 1) 

int xradius;(pt8in 2) 

int yradius;(ptsin 3) 

int begang;(intin 0), Anfangswinkel 

int endang;(intin 1), Endwinkel 

v_ellipse(handle, x, y, xradius, yradius, begang, endang); 
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ELLIPSE OP: 11, FK: 5 

Die Funktion zeichnet eine Ellipse. Die Zeichenattribute sind 
zuvor zu bestimmen. 

Eingabeparameter: 

ptsin(O) x-Ordinate Mittelpunkt 

ptsin(l) y-Ordinate Mittelpunkt 

pt8in(2) x-Radius 

ptsin(3) y-Radius 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int x;(ptsin 0) 
int y;(ptsin 1) 
int xradius; (ptsin 2) 
int yradius;(ptsin 3) 

v_ellipse(handle, x, y, xradius, yradius, begang, endang); 


ROUNDED RECTANGLE OP: U, FK: 8 

Zeichnet ein Rechteck mit abgerundeten Ecken. Die Koordina¬ 
ten sind die Punkte, die sich bei Verlängerung der Seitenkanten 
als Schnittpunkte ergeben würden. 

Eingabeparameter: 

ptsin(O) x-Ordinate obere linke Ecke 

pt8in(l) y-Ordinate obere linke Ecke 

ptsin(2) x-Ordinate untere rechte Ecke 

ptsin(3) y-Ordinate untere rechte Ecke 

Ausgabeparameter: 


Standard 
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Zugriff: 

C int handle; 

int pxyarray[4] (ptsin) 
v_rbox(handle, pxyarray) 


FILLED ROUNDEDRECTANGLE OP: 11, FK: 9 

Zeichnet ein ausgefülltes Rechteck mit abgerundeten Ecken. Die 
Koordinaten sind dabei die Punkte, die sich aus der Ver¬ 
längerung der Schnittkanten ergeben. 

Eingabeparameter: 

ptsin(0) x-Ordinate obere linke Ecke 

ptsin(l) y-Ordinate obere linke Ecke 

ptsin(2) x-Ordinate untere rechte Ecke 

ptsin(3) y-Ordinate untere rechte Ecke 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int pxyarray[4] (ptsin) 
v_rfbox(handle, pxyarray) 


JUSTIFIED GRAPHICS TEXT OP: 11, FK: 10 

Ausgabe von links- und rechtsbündigen Texten durch Dehnung 
der Zwischenräume (Einfügen von Space). Es ist auch möglich, 
die einzelnen Zeichen zu dehnen. Der Text wird an intin über¬ 
geben und muß mit ASCII(O) enden. 

Eingabeparameter: 

intin(O) Wortdehung 0=aus l=ein 

intin(l) Zeichendehnung 0=aus l=ein 

intin(2-n) enthält den String 
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ptsin(O) x-Ordinate Textausrichtung 

pt8in(l) y-Ordinate Textausrichtung 

ptsin(2) Soll-Textlänge in x-Richtung 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int x;(ptsin 0) 
int y; (ptsin 1) 
int lenght;(ptsin 2) 
int word_8pace; (intin 0) 
int char_space;(intin 1) 
int string[n];(intin 2..n) 

v_justified(handle, x, y, string, lenght, word_space, char_space); 


Die Attribute-Funktionen 


SET WRITING MODE OP: 32 

Grafikausgabe-Modus setzen. Der Modus steht in intin(O): 


replace 

transparent 

XOR 


reverse transparent 


(Normal, alle Punkte werden gesetzt) 

(setzt alle Punkte außer solche, an die 
Punkte ohne Farbe gesetzt werden sollen) 

(setzt Punkte, wo keine sind und löscht 
Punkte, die mit der neuen Grafik über¬ 
einstimmen). 

(setzt alle sich überschneidenden Punkte 
einer Farbe) 


Eingabeparameter: 

intin(O) Zeichenmodus 
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Ausgabeparameter: 

intout(O) Rückgabe des ausgewählten Modus 

Zugriff: 

C int handle; 
int mode; 
int set_mode; 

set_mode — vswr_mode(handle, mode); 

Bemerkungen: 

Wahrheitswerte der Zeichenmodi: 


Replace: Punktfarbe = (Farbmaske Objekt) AND 

(Grafikobjekt) 

Transparent: Punktfarbe = ((Farbmaske Objekt) AND 

(Grafikobjekt)) OR ((schon gesetzte 
Farbe) AND NOT (Grafikobjekt)) 

XOR-Modus: Punktfarbe = (Grafikobjekt) XOR (schon 

gesetzte Farbe) 


Reverse-Transparent: Punktfarbe = ((schon gesetzte Farbe) 

AND (Grafikobjekt)) OR ((Farbmaske 
Objekt) AND NOT (Grafikobjekt)) 


SET COLORREPRESENTATION OP: 14 

Mischen der Farben aus den Grundfarben Rot, Grün und Blau 
durch Festlegung der Itensität. Die Funktion ist nur bei Farb¬ 
monitoren sinnvoll. 

Eingabeparameter: 

intin(O) Farbindex 0..255 

intin(l) Rot-Anteil (0-1000) 

intin(2) Grün-Anteil (0-1000) 

intin(3) Blau-Anteil (0-1000) 

Ausgabeparameter: 


Standard 
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Zugriff: 

C int handle; 

int index;(intin 0) 

int rgb_in[3];(intin 1..S) 

vs_color(handle, index, rgb_in) 

Bemerkungen: 

Die verfügbaren Farbmöglichkeiten werden beim Öffnen des 
Gerätes ermittelt. Siehe "Open Virtual Screen Workstation". 


SET POLYLINE COLOR INDEX OP: 17 

Auswahl einer Farbe aus der gemischten Farbtabelle für das 
Zeichnen mit grafischen Grundfunktionen. Bei Monochrom- 
Monitoren ist nur 0 und 1 möglich - diese Farben müssen nicht 
gemischt werden. 

Eingabeparameter: 

intin(O) Linienfarbe 

Ausgabeparameter: 

intout(O) gewählte Linienfarbe 

Zugriff: 

C int handle; 

int color_index; 
int set__color; 

set_color = vsl_color(handle, color_index) 


SET POLYLINE LINE TYPE 
Festlegen eines Linientyps für Polyline: 

1 = durchgehend _ 

2 = unterbrochen _ 

3 = Punkte _ _ 

4 = Strichpunkt _ _ 


OP: 15 
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5 = gestrichelt (1/2) _ 

6 = Strichpunkt-Punkt _ 

7 = User-definiert mit SET-USER DEFINED LINE STYLE PATTERN. 

Eingabeparameter: 

intin(0= Linienstil 

Ausgabeparameter: 

intout(O) gewählter Linienstil 

Zugriff: 

C int handle; 
int style; 
int set_type 

8ettype=vsl_type(handle, style); 


SET USER-DEFINED LINE STYLE PATTERN OP: 113 

Legt das Aussehen für die Linie 7 in der Polyline-Funktion fest. 
—» SET POLYLINE LINE TYPE. 

Eingabeparameter: 

intin(O) Liniengestaltung als 16-Bit-Wort 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 
int pattern; 

vsl_udsty (handle, pattern); 
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SET POLYLINE LINE WIDTH OP: 16 

Definition der Linienbreite mit ungeraden Zahlen größer 2. 

Eingabeparameter: 

ptsin(O) Linienbreite 

ptsin(l) Enthält 0 (in Assembler zwingend) 

Ausgabeparameter: 

ptsout(O) gewählte Linienbreite 

ptsout(l) Enthält 0 

Zugriff: 

C int handle; 

int width;(pt8in 0) 

int 8et_width;(pt8out 0) 

set_width = vsl_width(handle, width); 


SET POLYLINE END STYLES OP: 108 

Beendet Linien der Polyline-Funktion durch bestimmte Formen: 


1 = normal (einfache Kanten) 

2 = pfeilförmig 

3 = runde Ecken 


Eingabeparameter: 

intin(O) Stil des Linienanfangs 

intin(l) Stil des Linienendes 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int beg_8tyle;(intin 0) 
int end_style;(intin 1) 
vsl_ends(handle, beg_style, end_style) 
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SET POLYMARKER TYPE OP: 18 

Setzt Markierungsart für Polymarker-Funktion: 

Eingabeparameter: 

intin(O) Markierungssymbol 

1 = Punkt 

2 = Pluszeichen 

3 = Stern (Standard, wenn Auswahl >7, also 

ungültig) 

4 = Quadrat 

5 = Diagonal-Kreuz 

6 = Diamant 

Ausgabeparameter: 

intout(O) gewähltes Markierungssymbol 

Zugriff: 

C int handle; 
int symbol; 
int set_type; 

set_type = vsm_type(handle, symbol); 


SET POLYMARKER HEIGHT OP: 19 

Bestimmt die Höhe der Polymarker-Symbole. 

Eingabeparameter: 

ptsin(O) Enthält 0 (in Assembler zwingend) 

ptsin(l) Markierungshöhe (falls ungültig, nächste kleinere!) 

Ausgabeparameter: 

pt8out(0) erhält Markierungsbreite 

ptsout(l) erhält Markierungshöhe 

Zugriff: 

C int handle; 
int height; 
int set_handle; 

set_height = vsm_height(handle, height); 
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Bemerkungen: 

Die C-Funktion erhält keine Markierungsbreite. 


SET POLYMARKER COLOR INDEX OP: 20 

Setzt die Farbe der mit Polymarker vorgenommenen Markierun¬ 
gen. 

Eingabeparameter: 

intin(O) Farbindex 

Ausgabeparameter: 

intout(O) gewählter Farbindex 

Zugriff: 

C int handle; 

int color_index; 
int set_color; 

set_color=vsm_color(handle, color_index) 


SET CHARACTER HEIGHT, ABSOLUTE MODE OP: 12 

Legt die Größe (Characterhöhe) des Grafiktextes fest. Die 
Größen ergeben sich aus einem gedachten Rechteck mit der 
Grundlinie=Textboden, Seitenlinien=Textanfang und -ende sowie 
Dachlinie=oberes Ende der Großbuchstaben. 

Eingabeparameter: 

ptsin(O) Enthält 0 (in Assembler zwingend) 

ptsin(l) Zeichenhöhe 

Ausgabeparameter: 

ptsout(O) Zeichenbreite 

ptsout(l) gewählte Zeichenhöhe 

ptsout(2) Breite der gedachten Box 

ptsout(3) Höhe der gedachten Box 
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Zugriff: 

C int handle; 

int height;(pt8in 1) 
int char_width;(pt 80 ut 0) 
int char__height;(ptsout 1) 
int cell__width;(ptsout 2) 
int cell_height; (ptsout 3) 

vst_height(handle, height, &char_width, &char_height, &cell_width, 
&cell_height) 


SET CHARACTER CELL HEIGHT, POINT MODE OP: 107 

Setzt die Höhe einer Box, welche der äußeren Größe eines 
Zeichens entspricht, in Schritten von 1/72 Inch (engl. Maßein¬ 
heit: 1 Inch = 2.54 cm, 1/72 Inch = 1.8288 cm). 


Eingabeparameter: 

intin(O) Zeichenboxhöhe (Zeilenabstand) 


Ausgabeparameter: 


intout(O) 

ptsout(O) 
ptsout(l) 
ptsout(2) 
ptsout(3) 


gesetzte Zeichenboxhöhe 

Zeichenbreite 
Zeichenhöhe 
Aktuelle Box-Breite 
Aktuelle Box-Höhe 


Zugriff: 

C int handle; 
int point; 

int set_point; (intout) 
int char_width; (ptsout 0) 
int char_height; (ptsout 1) 
int cell__width; (ptsout 2) 
int cell_height; (ptsout 3) 

8et_point=vst_point(handle, point, &char_width, &char_height, 
&cell_width, &cell_height) 
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Bemerkungen: 

In Proportionalschrift wird das größte Zeichen als Bemessungs¬ 
grundlage genommen. 


SET CHARACTER BASELINE VEKTOR OP: 13 

Dreht die Character-Grundlinie in Schritten zu l/10tel Grad 
(ermöglicht Schrift in alle Richtungen). Null Grad ist dabei 
rechts, die Drehung erfolgt entgegen dem Uhrzeiger. 

Eingabeparameter: 

intout(O) Drehwinkel (0-3600) 

Ausgabeparameter: 

intout(O) gewählter Drehwinkel 

Zugriff: 

C int handle; 
int angle; 
int set_baseline; 

set_baseline=v8tvst_rotation(handle, angle) 

Bemerkungen: 

Es sind nur Winkel in 90 Grad-Schritten möglich. 


SET TEXT FACE OP: 21 

Auswahl eines Zeichensatzes, der mit "Load Fonts" geladen 
worden ist. 

Eingabeparameter: 

intin(O) Zeichensatz 

Ausgabeparameter: 

intout(O) gewählter Zeichensatz 
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Zugriff: 

C int handle; 
int font; 
int 8et_font; 

set_font=vst_font(handle, font) 

Bemerkungen: 

Für Atari ST existiert kein Gerätetreiber, der mehrere Zeichen¬ 
sätze verfügbar hat. Die Funktion ist daher nicht sinnvoll ein¬ 
zusetzen. Zeichensatz 1 ist Standard. 


SET GRAPHIK TEXT COLOR INDEX OP: 21 

Auswahl der Textfarbe aus den gemischten Farben. 

Eingabeparameter: 

intin(O) Farbinde’x 

Ausgabeparameter: 

intout(O) gesetzter Farbindex 

Zugriff: 

C int handle; 

int color_index 
int set_color 

set_color=vst_color(handle,color_index) 


SET GRAPHIC TEXT SPECIAL EFFECTS OP: 106 

Auswahl des Schrifttyps. 


Eingabeparameter: 

intin(O) Schrifttyp in den 6 niederwertigen Bits. 
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Bit Wert Schriftart 


0 

1 

2 

3 

4 

5 


1 

2 

4 

8 

16 

32 


fett 

hell 

italic 

Unterstreichen 

Breitschrift 

schattiert 


Ausgabeparameter: 

intout(O) gewählter Schrittyp 

Zugriff: 

C int handle; 
int effect; 
int set_effect; 

8et_effect=vst_effects(handle, effect); 

Bemerkungen: 

Ist die Funktion auf dem Ausgabegerät nicht verfügbar, ist 
set_effect 0 (Kein besonderer Schrifttyp gesetzt). 


SET GRAPHIK TEXT ALIGNMENT OP: 39 

Ausrichten des mit der Justify-Funktion ausgegebenen Textes 
horizontal: 

Eingabeparameter: 

intin(O) Horizontale Ausrichtung 

0 = links (linksbündig) 

1 = zentriert (mittelständig) 

2 = rechts (rechtsbündig) 

intin(l) Vertikale Ausrichtung 

0 = baseline (Untergrenze der Zeichen) 

1 = halfline (Obergrenze der Kleinbuchstaben) 

2 = ascent line (Obergrenze der Zeichen) 

3 = bottom line (an der Untergrenze der gedachten 

Box*) 
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4 = descent line (Untergrenze der Unterlängen) 

5 = top line (an der Obergrenze der gedachten Box*) 

(*) siehe Justified Graphics Text. 
intout(O) gesetzte horizontale Ausrichtung 

intout(l= gesetzte vertikale Ausrichtung 

Zugriff: 

C int handle; 

int hor_in;(intin 0) 
int hor__out;(intout 0) 
int vert_in;(intin 1) 
int vert_out;(intout 1) 

vst_alignment(handle, hor__in, vert_in, &hor_out, vert_out); 


SET FILL INTERIOR STYLE OP: 23 

Auswahl der Füllfunktion. Im Anhang finden Sie eine Tabelle 
mit allen möglichen Fülltypen. 

0 = nicht ausfüllen 

1 = ganz ausfüllen (mit der Füllfarbe) 

2 = punktiert (siehe Set Fill Style Index, 

Punkte=Füllfarbe) 

3 = schraffiert (siehe Set Fill Style Index, 

Linien=Füllfarbe) 

4 = user-definiert (siehe Set User Defined Fill 

Pattern) 


Eingabeparameter: 

intin(O) Füllstil (0-4) 

intout(O) gewählter Füllstil 

Zugriff: 

C int handle; 
int style; 
int 8et_interior; 

set_interior=vsf_interior(handle, style); 
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SET FILL STYLEINDEX OP: 24 

Füllmuster auswählen, abhängig von der mirt Set Fill Interior 
Style eingestellten Füllart (intin 0 = 2 oder 3). 

Eingabeparameter: 

intin(O) Füllmuster (1-24 punktiert, 1-12 schraffiert) 

Ausgabeparameter: 

intout(O) gewähltes Füllmuster 

Zugriff: 

C int handle; 

int style_index; 
int set_style; 

8et_8tyle=v8f_style(handle, style_index) 


SET FILL COLORINDEX OP: 25 

Setzt die Farbe für das Füllmuster entsprechend der mit Set 
Color Representation festgelegten Mischfarben (bei Monochrom- 
Monitoren ist nur 0 (schwarz) und 1 (weiß) möglich. 

Eingabeparameter: 

intin(O) Füllfarbe 

Ausgabeparameter: 

intout(O) gewählte Füllfarbe 

Zugriff: 

C int handle; 

int color_index; 
int set_color; 

set_color=vsf_color(handle, color__index); 
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SET FILL PERIMETER VISIBILITY OP: 104 

Füllflächenumrahmung-Sichtbarkeit festlegen. 

Eingabeparameter: 

intin(O) Sichtbarkeit 0=ausschalten l=einschalten 

Ausgabeparameter: 

intout(O) gewählte Sichtbarkeit 

Zugriff: 

C int handle; 

int per_vis; 
int 8et_perimeter; 

8et_perimeter=vsf_perimeter(handle, per_vis) 


SET USER DEFINED FILL PATTERN OP: 112 

Benutzereigenes Füllmuster definieren. Für das Füllmuster wer¬ 
den 16 2-Byte-Worte benötigt, wobei jedes Wort eine Zeile des 
Musters bestimmt. Für mehrfarbige Muster müssen mehrere 
Muster-Arrays hintereinander definiert werden. 

contrl(3) Anzahl der Muster-Worte (Farben*16) 

Eingabeparameter: 

intin(O) bis 

intin(l5) 16-Wort-Gruppe für erste Füllfarbe (Muster) 

intin(l6) bis 

intin(31) 16-Wort-Gruppe für zweite Füllfarbe (Muster) 


Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int planes;/* Füllfarben-Anzahl */(Länge(intin)+l)/l6 
int pfill_pat[planes*16] (Länge(intin)+l) 
vsf_updat(handle, pfill_pat, planes); 
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Raster-Operationen 


COPY RASTER,OPAQUE OP: 109 

Logische Verknüpfung zwischen Quell- und Zielraster. Besitzen 
Quell- und Zielraster unterschiedliche Größen, so wird in der 
Größe des Quellrasters verknüpft. Verknüpfungsmodi sind (QR 
= Quellraster, ZR = Zielraster, R = Verknüpfungsresultat): 


0 

R = 0 

1 

R = QR AND ZR 

2 

R = QR AND (NOT ZR) 

3 

R = QR 

4 

R = (NOT QR) AND ZR 

5 

R = ZR 

6 

R = QR XOR ZR 

7 

R = QR OR ZR 

8 

R = NOT (QR OR ZR) 

9 

R = NOT (QR XOR ZR) 

10 

R = NOT ZR 

11 

R = QR OR (NOT ZR) 

12 

R = NOT QR 

13 

R = (NOT QR) OR ZR 

14 

R = NOT (QR AND ZR) 

15 

R = 1 

Eingabeparameter: 

contrl(7-8) 

Adresse des Quellrasters (MFBD) 

contrl(9-10) 

Adresse des Zielrasters (MFDB) 

intin(O) 

Verknüpfungsmodus 

pt8in(0) 

X-Ordinate linke obere Ecke Quellraster 

ptsin(l) 

Y-Ordinate linke obere Ecke Quellraster 

ptsin(2) 

X-Ordinate rechte untere Ecke Quellraster 

ptsin(3) 

Y-Ordinate rechte untere Ecke Quellraster 

ptsin(4) 

X-Ordinate linke obere Ecke Zielraster 

ptsin(5) 

Y-Ordinate linke obere Ecke Zielraster 

ptsin(6) 

X-Ordinate rechte untere Ecke Zielraster 

ptsin(7) 

Y-Ordinate rechte untere Ecke Zielraster 
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Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int wr_mode;(intin) 
int pxyarray[8](ptsin) 
int *psrcMFDB; (contrl 7-8) 
int *pdesMFDB; (contrl 9-10) 

vro_cpyform(handle,wr_mode,pxyarray,p8rcMFDB 1 pdesMFDB); 

Bemerkungen: 

In Maschinensprache muß ein MFDB auf gebaut werden 
(Während dies in C automatisch geschieht). 


COPYRASTER, TRANSPARENT OP: 121 

Verknüpfung eines einfarbigen mit einem mehrfarbigen Raster. 


1 replace 

2 transparent 

3 XOR 

4 reverse 


(Normal, alle Punkte werden gesetzt) 

(setzt alle Punkte außer solche, an die Punkte 
ohne Farbe gesetzt werden sollen) 

(setzt Punkte, wo keine sind und löscht Punkte, 
die mit der neuen Grafik übereinstimmen). 

transparent (setzt alle sich überschneidenden 
Punkte einer Farbe) 


Eingabeparameter: 


contrl(7-8) 

contrl(9-10) 

intin(O) 

intin(l) 

intin(2) 

ptsin(O) 

ptsin(l) 

ptsin(2) 

ptsin(3) 


Adresse des Quellrasters (MFBD) 

Adresse des Zielrasters (MFDB) 

Zeichenmodus (-> SET WRITE MODE + s.o.) 
Farbindex gesetzte Punkte 
Farbindex nicht gesetzte Punkte 
X-Ordinate linke obere Ecke Quellraster 
Y-Ordinate linke obere Ecke Quellraster 
X-Ordinate rechte untere Ecke Quellraster 
Y-Ordinate rechte untere Ecke Quellraster 



302 


Das große Mega-ST-Buch 


ptsin(4) X-Ordinate linke obere Ecke Zielraster 

pt8in(5) Y-Ordinate linke obere Ecke Zielraster 

pt8in(6) X-Ordinate rechte untere Ecke Zielraster 

pt8in(7) Y-Ordinate rechte untere Ecke Zielraster 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int wr_mode;(intin 0) 

int color_index[2];(intin 1..2) 

int pxyarray[8](ptsin) 

int *psrcMFDB; (contrl 7-8) 

int *pdesMFDB; (contrl 9-10) 

vr_trnfm() 

vro_cpyfm(handle, wr_mode, pxyarray, psrcMFDB.pdesMFDB); 

Bemerkungen: 

In Maschinensprache muß ein MFDB auf gebaut werden 
(Während dies in C automatisch geschieht). 


TRANSFORM FORM OP: 110 

Umwandlung von Rasterformaten in geräteeigene und umge¬ 
kehrt. Aufruf u.U. vor vro_cpyfm notwendig. 

Eingabeparameter: 

contrl(7-8) Adresse des Quellrasters (MFBD) 

contrl(9-10) Adresse des Zielrasters (MFDB) 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int *psrcMFDB;(contrl 7-8) 
int *pdesMFDB:(contrl 9-10) 
vs_trnfm(handle, psrcMFDB, pdesMFDB); 
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Bemerkungen: 

In Maschinensprache muß ein MFDB aufgebaut werden 
(Während dies in C automatisch geschieht). 


GET PIXEL OP: 105 

Stellt Zustand (gesetzt/nicht gesetzt) und Farbe eines Punktes 

auf dem Bildschirm fest. 

Eingabeparameter: 

ptsin(O) x-Ordinate des Pixels 

ptsin(l) y-Ordinate des Pixels 

Ausgabeparameter: 

intout(O) Zustand 0=nicht gesetzt l=gesetzt 

intout(l) Pixelfarbe 

Zugriff: 

C int handle; 

int x;(ptsin 0) 

int y;(ptsin 1) 

int *pel;(intout 0) 

int *index;(intout 1) 

v_get_pixel(handle, x, y, pel, index); 


Eingabe-Funktionen 

SET INPUT MODE OP: 33 

Setzt den Modus der logischen Eingabeeinheiten. Diese sind: 

1 = Positions-Eingaben (Maus oder Grafikcursor) 

2 = Wert-Eingaben (Cursortasten "nach oben" und 

"nach unten") 
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3 = Logische Auswahl (ST-Funktionstasten Fl bis 

F10) 

4 = Stringeingabe (Tastatur) 

Die logische Eingabeeinheiten arbeiten in folgenden Modi: 

1 = request mode (Nachfrage-Modus; es wird auf 

ein Eingabeereignis gewartet) 

2 = sample mode (Erfrage-Modus; es wird der Zu¬ 

stand des Eingabegeräts ermittelt, aber nicht 
auf eine Ein gäbe gewartet) 


Eingabeparameter: 

intin(O) Eingabegerät (1..4) 

intin(l) Eingabemodus (1..2) 

Ausgabeparameter: 

intout(O) gewählter Eingabemodus 

Zugriff: 

C int handle; 

int set_mode;(intout 0) 
int dev_type;(intin 0) 
int mode;(intin 1) 

set__mode=vsin_mode(handle, dev_type, mode); 


INPUT LOCATOR,REQUEST MODE OP: 28 

Ausgabe der Grafikcursorposition nach einem Tastendruck. Der 
Cursor wird während des Aufrufs dieser Funktion unabhängig 
von seinem sonstigen Zustand sichtbar. 


Eingabeparameter: 

ptsin(O) x-Ordinate Initialisierung Grafik-Cursor 

ptsin(l) y-Ordinate Initialisierung Grafik-Cursor 
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Ausgabeparameter: 

intout(O) ASCII-Code der Taste, welche die Funktion beendet 

ptsoutfO) festgestellte x-Ordinate Grafikcursor 

ptsout(l) festgestellte y-Ordinate Grafikcursor 

Zugriff: 

C int handle; 

int x;(ptsin 0) 

int y;(ptsin 1) 

int xout;(ptsout 0) 

int yout;(ptsout 1) 

int term;(intout 0) 

set_mode=vsin_mode(handle, 1, 1); 

vrq_locator(handle, x, y, &xout, &yout, &term); 


INPUT LOCATOR, SAMPLE MODE OP: 28 

Ausgabe der Grafikcursorposition, ohne daß eine Taste gedrückt 
werden mußte und Rückgabe des ASCII-Wertes einer evtl, ge¬ 
drückten Taste. 


Eingabeparameter: 

ptsin(O) x-Ordinate (Initialisierung) Grafikcursor 

pt8in(l) y-Ordinate (Initialisierung) Grafikcursor 


Ausgabeparameter: 


ptsout(O) 

ptsout(l) 

contrl(2) 

contrl(4) 

intout(O) 


x-Ordinate der festgestellten Grafikcursorposition 
y-Ordinate der festgestellten Grafikcursorposition 

Koordinaten-Status (0=nicht geändert, l=geändert) 
Tastatur-Status (0=nicht geändert, l=geändert) 

ASCII-Wert einer evtl, gedrückten Taste (Low-Byte) 


Zugriff: 

C int handle; 

/*status = contrl(2) | (contrl(4) <<1) */ 

int x;(pt8in 0) 

int y;(ptsin l) 

int xout;(ptsout 0) 
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int yout;(ptsout 1) 
int term;(intout 0) 
set_mode=vsin_mode(handle, 1, 2); 

status=vsm_locator(handle, x, y, itxout, «feyout, &term); 
Status : contrl(4) OR contrl(2) (Bitweise) 


INPUT VALULATOR, REQUEST MODE OP: 29 

Rückgabe der betätigten Taste oder Tastenkombination zur 
Wertveränderung. Der Rückgabewert liegt zwischen 0 und 100. 
Dabei gilt: 


Cursor nach oben 
Cursor nach unten 
Shift+Cursor nach oben 
Shift+Cursor nach unten 


= Wert n+10, 
= Wert n-10, 
= Wert n+1, 
= Wert n-1. 


Eingabeparameter: 

intin(O) Wert-Initialisierung 

Ausgabeparameter: 

intout(O) Wert-Rückgabe 

intout(l) gedrückte Taste als ASCII 

Zugriff: 

C int handle; 

int valulator_in;(intin) 
int va!ulator_out;(intout 0) 
int terminator;(intout 1) 
set_mode=vsin_mode(handle, 2, 1); 

vrq_valulator(handIe, valulator_in, &valulator_out, iiterminator); 
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INSERT VALULATOR, SAMPLE MODE OP: 29 

Stellt fest, ob und welche Aktion die Eingabeeinheit beeinflusst 
hat. Der Rückgabe wert liegt zwischen 0 und 100. Dabei gilt: 


Cursor nach oben 
Cursor nach unten 
Shift+Cursor nach oben 
Shift+Cursor nach unten 


= Wert n+10, 
= Wert n-10, 
= Wert n+1, 

= Wert n-1. 


Eingabeparameter: 

intin(O) Wert-Initialisierung 

Ausgabeparameter: 

intout(O) ermittelter Wert 

intout(l) ASCII-Code der gedrückten Taste/Kombination. 

contrl(4) 0 (keine Aktion) 

1 (Wertveränderung) 

2 (Taste gedrückt) 

Zugriff: 

C int handle; 

Status; 

int val_in (intin 0) 
int val_out;(intout 0) 
int term;(intout 1) 
set_mode=v8in_mode(handle, 2, 2); 

vsm_valulator(handle, val_in, &val_out, &term, &status); 


INPUT CHIOCE, REQUEST MODE OP: 30 

Wartet auf Drücken einer Funktionstaste und gibt den Wert 
zurück. Bei ungültigen Eingaben wird der ASCII-Code der 
falschen Eingabetaste zurückgegeben. 
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Eingabeparameter: 

intin(O) Auswahlnr.-Initialisierung (F1-F10) 

Ausgabeparameter: 

intout(O) Gedrückte Funktionstaste (1..10) 

Zugriff: 

C int handle; 
int ch_in; 
int *ch_out; 

8et_mode=V8in_mode(handle, 3, 1); 
vrq_choice(handle, ch_in, ch__out); 


INPUT CHOICE, SAMPLE MODE OP: 30 

Gibt den Wert der zuletzt gedrückten Funktionstaste bzw. den 
ASCII-Code einer falschen gedrückten Taste aus. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

intout(O) gedrückte Funktionstaste (1..10) (bzw. ASCII ungültige 

Taste) 

contrl(4) status 

0 (kein Tastendruck) 

1 (Tastendruck) 

Zugriff: 

C int handle; 

int 8tatus;(s.u.) 
int choice;(Ausgabeparameter) 
set_mode=V8in_mode(handle, 3, 2); 
statu8=V8m_choice(handle, &choice); 
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INPUT STRING, REQUEST MODE OP: 31 

Liest Zeichen(-ketten) von der Tastatur und ermöglicht die 
gleichzeitige Bildschirmausgabe. Die Eingabe gilt als beendet, 
wenn die maximale (spezifizierte) Stringlänge erreicht oder 
Return gedrückt wurde. 

Eingabeparameter: 

intin(O) max. Stringlänge 

intin(l) Bildschirmdarstellung 0=nein l=ja 

ptsin(O) x-Ordinate obere linke Ecke Bildschirmdarstellung 

ptsin(l) y-Ordinate obere linke Ecke Bildschirmdarstellung 

Ausgabeparameter: 

intout(O-n) erhält den String in den niederwertigen Bytes. 

Zugriff: 

C int handle; 

int max_lenght;(intin 0) 

int echo_mode;(intin 1) 

int echo_xy[2];(ptsin 0..1) 

char string[max_lenght); (intout) 

set_mode=vsin_mode(handle, 4, 1); 

vrq_string(handle, max_len gilt, echo_mode, echo_xy, &string); 

Bemerkungen: 

Wenn max_lenght < 0, wird der 2-Byte-Code (VDI-Standard- 
Tastatur) benutzt. 


INPUT STRING, SAMPLE MODE OP: 31 

Liest Zeichen(-ketten) von der Tastatur und ermöglicht die 
gleichzeitige Bildschirmausgabe. Die Eingabe gilt als beendet, 
wenn die maximale (spezifizierte) Stringlänge erreicht oder 
Return gedrückt wurde. 
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Eingabeparameter: 

intin(O) max. Stringlänge 

intin(l) Bildschirmdarstellung 0=nein l=ja 

ptsin(O) x-Ordinate obere linke Ecke Bildschirmdarstellung 

ptsin(l) y-Ordinate obere linke Ecke Bildschirmdarstellung 

Ausgabeparameter: 

intout(O-n) erhält den String in den niederwertigen Bytes. 

contrl(4) (status) 

0 (ungültiges Zeichen gesendet, Funktion abge¬ 
brochen) 

>1 (Stringlänge der gültigen Eingabe) 

Zugriff: 

C int handle; 

int max_lenght;(intin 0) 
int echo__mode;(intin 1) 
int echo_xy[2];(ptsin 0..1) 
char string[max_lenght]; (intout) 

8et_mode=vsin_mode(handle, 4, 1); 

status=vrq_string(handle,max_lenght,echo_mode,echo_xy, &string); 

Bemerkungen: 

Wenn max_lenght < 0, wird der 2-Byte-Code (VDI-Standard- 
Tastatur) benutzt. 


SET MOUSE FORM OP: 111 

Definiert das Aussehen des Mauszeigers in einem 16xl6-Raster. 

Eingabeparameter: 

intin(O) x-Ordinate des Aktionspixels (z.B. Pfeilspitze) 

intin(l) y-Ordinate des Aktionspixels (jeweils relativ zur oberen 

linken Ecke des Cursor-Rasters) 
intin(2) reserviert, muß 1 sein 

intin(3) Farbindex der Cursormaske 

intin(4) Farbindex der Cursorform 
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intin(5) bis 

intin(20) Maske (16 Wort-Gruppe) 

intin(21) bis 

intin(36) Form (16-Wort-Gruppe, Punkte in Vordergrundfarbe=l) 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

int pcur_form[37];(intin) 
vsc_form(handle, pcur_form); 


EXCHANGE TIMERINTERRUPT VECTOR OP: 118 

Setzt eine Benutzer-Routinen-Adresse auf den Systemtimer- 
Interrupt. 

Eingabeparameter: 

contrl(7) bis 

contrl(8) 32-Bit-Adresse, neuer Interrupt-Vektor 

Ausgabeparameter: 

contrl(9) bis 

contrl(lO) 32-Bit-Adresse, alter Interrupt-Vektor 

intout(O) Abstände zwischen den Interrupts in 1/1000 Sekunden. 

Zugriff: 

C int handle; 

int *tim_addr; (contrl 7..8) 
int *otim_addr; (contrl 9..10) 
int tim_conv;(intout) 

vex_time(handle, tim_addr, otim__addr, &tim_conv); 
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SHOW CURSOR OP: 122 

Macht den Grafikcursor auf dem Bildschirm sichtbar. Wenn das 
Flag in intin(O) nicht ausgeschaltet wird, ist zum sichtbar 
machen des Grafikcursors die gleiche Anzahl Show Cursor 
Aufrufe erforderlich, wie zuvor Hide Cursor aufgerufen wurde. 

Eingabeparameter: 

intin(O) Flag (0 = Hide Cursor Aufruf-Anzahl wird ignoriert, 

1 = Für jeden Hide Cursor ist ein Show Cursor Aufruf 
erforderlich). 

Ausgabeparameter: 

Standard 


Zugriff: 

C int handle; 
int reset; 

v_show_c(handle, reser); 


HIDE CURSOR OP: 123 

Macht den Grafikcursor auf dem Bildschirm unsichtbar; sichtbar 
machen mit Show Cursor. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

Standard 

Zugriff: 

C int handle; 

v_hide_c(handle); 
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SAMPLE MOUSE BUTTON STATE OP: 124 

Gibt die Position des Grafikcursors und den Status der 
Maustasten aus. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

intout(O) Tastenstatus 

0 = nicht gedrückt 
1 = Taste gedrückt) 

ptsout(O) x-Ordinate des Grafikcursors 

1 = y-Ordinate des Grafikcursors 

Zugriff: 

C int handle; 

int pstatusj(intout) 
int x;(ptsout 0) 
int y;(ptsout 1) 

vq_mouse(handle, &pstatus, &x, &y); 


EXCHANGE BUTTON CHANGE VECTOR OP: 125 

Bewirkt, daß bei Betätigung der Maustaste zu einer definierten 
Routine gesprungen wird. 

Eingabeparameter: 

contrl(7) bis 

contrl(8) 32-Bit-Adresse, neue Maustastenreaktionsadresse 

Ausgabeparameter: 

contrl(9) bis 

contrl(lO) 32-Bit-Adresse (alte Adresse) 
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Zugriff: 

C int handle; 

int *pusrcode;(Eingabeparameter) 
int ‘psavcode; (Ausgabeparanieter) 
vex_butv(handle, pusrcode, psavcode); 

Bemerkungen: 

Der gedrückte Mausknopf ist in einem Prozessorregister ent¬ 
halten. 


EXCHANGE MOUSEMOVEMENT VECTOR OP: 126 

Maus-Bewegungs-Handling: bei Bewegung der Maus wird zu 
einer definierten Routine gesprungen und die neue Cursor¬ 
position berechnet, ohne die alte zu aktualisieren. 

Eingabeparameter: 

contrl(7) bis 

contrl(8) 32-Bit-Adresse, neue Mausbewegungsreaktionsadresse 

Ausgabeparameter: 

contrl(9) bis 

contrl(lO) 32-Bit-Adresse (alte Adresse) 

Zugriff: 

C int handle; 

int "'pusrcode; (Eingabeparameter) 
int ‘psavcode; (Ausgabeparameter) 
vex_motv(handle, pusrcode, psavcode); 

Bemerkungen: 

Die neuen Koordinaten des Grafikcursors sind in einem 
Prozessorregisterpaar enthalten. 
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EXCHANGE CURSOR CHANGE VECTOR OP: 127 

Bewirkt, daß bei Bewegung des Grafikcursors zu einer definier¬ 
ten Routine gesprungen wird. 

Eingabeparameter: 

contrl(7) bis 

contrl(8) 32-Bit-Adresse, neue Cursorveränderungs-Reaktionsadresse 

Ausgabeparameter: 

contrl(9) bis 

contrl(lO) 32-Bit-Adresse (alte Adresse) sichern 

Zugriff: 

C int handle; 

int ’pusrcode; (Eingabeparameter) 
int *psavcode; (Ausgabeparameter) 
vex_curv(handle, pusrcode, psavcode); 

Bemerkungen: 

Die neuen Koordinaten des Grafikcursors sind in einem, 
Prozessorregisterpaar enthalten. 


SAMPLE KEYBOARD KEY INFORMATION OP: 128 

Tastaturstatus der Sondertasten ermitteln. 

Eingabeparameter: 

Standard 

Ausgabeparameter: 

intout(O) Status (0..15) 

Bit Wert Taste 

0 1 Shift rechts 

1 2 Shift links 

2 4 Control 

3 8 Alternate 
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Zugriff: 

C int handle; 
int pstatus; 

vq_key_8(handle, &pstatus); 


Nachfrage-Funktionen 


EXTENDED INQUIRE FUNCTION 

Ermittlung der 57 Workstation-Parameter oder 
gerätespezifischer Informationen: 


Eingabeparameter: 

intin(O) Typ der Information 

0 = Open Workstation 
1 = Extended) 


Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

intout(3) 


intout(4) 

intout(5) 


intout(6) 

intout(7) 


intout(8) 


Bildschirmart (0..4) 
Hintergrundfarben, Anzahl 
Texteffekt-Unterstütung 
Vergrößerung 

0 = unmöglich 
1 = möglich 

Farbebenen für Raster, Anzahl 
Unterstützung Übersichts-Table 
0 = ja 
1 = nein 

Rasteroperationen je Sekunde 
Konturen Füllen Unterstützung 
0 = nein 
1 = ja 

Text Rotation Unterstützung 
0 = nein 

1 = 90-Grad-Schritte 

2 = beliebige Winkel zur Basis 


OP: 102 
weiterer 
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intout(9) 

intout(lO) 


intout(ll) 

intout(12) 

intout(13) 

intout(14= 

intout(15) 

intout(16) 

intout(17) 

intout(l8) 


Zeichenmodi, Anzahl 
Verfügbare Eingabe-Modi 
0 = keiner 

1 = request 

2 = sample 

Textausrichtung Unterstützung 
0 = nein 
1 = ja 

Farbwechsel Plotter 
0 = möglich 
1 = keine Einrichtung 
Farbwechsel Matrixdrucker 
0 = möglich 
1 = keine Einrichtung 
Verfügbare Punktzahl in Zeichenfunktion 
-1 = unbegrenzt 
Initin-Array, max. Länge 
-1 = unbegrenzt 
Maustasten, Anzahl 
verbreiterte Linien, Unterstützung 
0 = nein 
1 = ja 

Zeichenmodi verbreiterete Linien, Anzahl 


Zugriff: 

C int handle; 
int owflag; 
int work_out[57]; 

vq_extnd(handle, owflag, work_out) 


INQUIRE COLOR REPRESENTATION OP: 26 

Ermittlung der Farbmischung für den spezifizierten Index. 

Eingabeparameter: 

intin(O) Farbindex 

intin(X) Index-Flag (0=übergebener l=aktueller Farbindex) 
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Ausgabeparameter: 

intout(O) Rot-Anteil (0-1000) 

intout(l) Grün-Anteil (0-1000) 

intout(2) Blau-Anteil (0-1000) 

Zugriff: 

C int handle; 

int color_index;(intin 0) 
int set_flag;(intin 1) 
int rgb[3];(intout 0..2) 

vq_color(handle, color_index, set_flag, rgb); 


INQUIRE CURRENT POLYLINE ATTRIBUTES OP: 35 

Ermittlung der Linienattribute. 


Eingabeparameter: 

Standard 


Ausgabeparameter: 


intout(0) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 

ptsout(O) 


Typ-Attribut 

Farb-Attribut 

Zeichenmodus 

Form des Linienanfangs (Kante, Pfeil, Rund) 
Form des Linienendes (Kante, Pfeil, Rund) 

Breite-Attribut 


Zugriff: 

C int handle; 

int attrib[6]; 

vql_attributes(handle, attrib); 
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INQUIRE CURRENT POLIMARKER ATTRIBUTES OP: 36 
Ermittelt die definierten Markierungstypen. 


Eingabeparameter: 

Standard 


Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

ptsout(O) 

ptsout(l) 


Typ der Markierung (Punkt, Stern,...) 
Farbe der Markierung 
Zeichenmodus 

Breite der Markierung 
Höhe der Markierung 


Zugriff: 

C int handle; 

int attrib[5|; 

vqm_attributes(handle, attrib); 


INQIRE CURRENT FILL AREA ATTRIBUTES 
Ermittelt die eingestellten Füllattribute. 


Eingabeparameter: 

Standard 


Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 


Fülltyp 

Farbe 

Muster 

Zeichenmodus 

Umrahmungsstatus 


Zugriff: 

C int handle; 

int attrib[5]; 

vqf_attribute8(handle, attrib); 


OP: 37 
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INQUIRE CURRENT GRAPHIC TEXT ATTRIBUTES OP: 38 
Ermittelt die eingestellten Textattibute. 


Eingabeparameter: 

Standard 


Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 

intout(5) 

ptsout(O) 

ptsout(l) 

ptsout(2) 

ptsout(3) 


Zeichensatz 
Farbe des Textes 
Drehwinkel 

Justifikation horizontal 
Ju8tifikation vertikal 
Zeichenmodus 

Zeichenbreite 

Zeichenhöhe 

Breite der gedachten Box (-> ...) 
Höhe der gedachten Box (-> ...) 


Zugriff: 

C int handle; 

int attrib[l0]; 

vqt_attributes(handle, attrib); 


INQUIRE TEXT EXTEND OP: 116 

Berechnet die Ausdehnung eines Strings aufgrund seiner ihn be¬ 
stimmenden Attribute. 

Eingabeparameter: 

intin(O-n) enthält den String in den Low-Bytes 

Ausgabeparameter: 

pt8out(0) x-Ordinate Punkt 1 (relativ) 

ptsout(l) y-Ordinate Punkt 1 (relativ) 

ptsout(2) x-Ordinate Punkt 2 (relativ) 

ptsout(3) y-Ordinate Punkt 2 (relativ) 
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ptsout(4) 

x-Ordinate Punkt 3 (relativ) 

pt8out(5) 

y-Ordinate Punkt 3 (relativ) 

ptsout(6) 

x-Ordinate Punkt 4 (relativ) 

pt80Ut(7) 

y-Ordinate Punkt 4 (relativ) 

Zugriff: 


C int handle; 



int string[j; (Eingabeparameter) 
int extend[8]; (Ausgabeparameter) 
vqu_extent(handle, string, extent); 

Bemerkungen: 

In C wird der String automatisch an intin übergeben. 


INQUIRE CHARACTER CELL WIDTH OP: 117 

Ermittelt die Ausmaße eines Zeichens und der Zeichenbox (Ab¬ 
stand des Characters zum Rand der ihn umgebenden Box). 

Eingabeparameter: 

intin(O) Zeichen, dessen MaBe genommen werden sollen. 

Ausgabeparameter: 

intout(O) gewähltes Zeichen (-1, wenn ungültig) 

ptsout(O) Boxbreite 

ptsout(l) enthält 0 

ptsout(2) Abstand 
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5.6 GEM-AES 

Wie das im vorhergehenden Kapitel beschriebene VDI ist auch 
das AES ein Teil des GEM. Die Aufgaben des AES liegen bei 
der Benutzerführung, also der Menü- und Fensterbehandlung. 


Die Programmierung des AES ist sehr ähnlich wie beim VDI. 
Durch den Maschinenbefehl TRAP #2 wird das GEM aufge¬ 
rufen, in dem Datenregister DO muß nun aber der Wert $C8 für 
die Wahl des AES liegen. Außerdem wird in Dl ein Zeiger auf 
eine Tabelle übergeben, in welcher die Startadressen der Para¬ 
meterfelder des AES liegen. Diese Felder sind folgende: 


Control: Hier werden die Funktionsnummer sowie die 

Längen der anderen Felder eingetragen. 

Global: Dieses Feld enthält diverse Informationen über 

den Prozeß, aus dem der Funktionsaufruf stammt. 
Die Belegung dieses Feldes ist jedoch für den 
Programmierer nicht wichtig. 


Intin: Ähnlich wie beim VDI werden hierin die ver¬ 

schiedenen Parameter an die aufgerufene Funk¬ 
tion übergeben. 

Intout: In diesem Array werden Rückgabeparameter vom 

AES eingetragen. 

Addrin: Dieses Array besteht aus 32-Bit-Langworten. Es 

werden dort eventuell nötige Zeiger an das AES 
übergeben. 

Addrout: Aus der AES-Funktion zurückgegebene Zeiger 

finden sich in diesem Array. 

Die Felder haben grundsätzlich festgelegte Längen. Dennoch 
werden sie nie alle in voller Länge benötigt, so daß man nur die 
notwendigen Einträge vornehmen muß. Die Anzahl der in den 
einzelnen Feldern eingesetzten Parameter wird jeweils im 
Control-Feld eingetragen. 
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Wir wollen wieder ein wenig vorgreifen und einmal ein kleines 
Maschinen-Programm betrachten, welches eine einfache AES- 
Funktion aufruft. Es wird ein Alarm-Fenster dargestellt, in dem 
sich zwei Auswahlknöpfe befinden. Nachdem einer dieser 
Knöpfe angewählt wurde, kehrt das Programm zurück (RTS) 
und übergibt die Nummer des gewählten Knopfes in DO zurück. 
Das Programm ist als Unterprogramm ausgelegt und kann daher 
nicht eigenständig vom Desktop gestartet werden. Wenn Sie es 
z.B. aus einem Debugger starten wollen, so beachten Sie bitte, 
daß dieser als .PRG laufen muß; andernfalls ist das GEM nicht 
voll funktionstüchtig und der Rechner kann abstürzen. 

;***** AES-Demo: Darstellung eines Alert-Fensters ***** 

run: 


move.1 

#alerttxt,dO 

;Alarmtext in DO 

bsr 

form_alert 

;und Fenster darstellen 

rts 


;fertig! 

alerttxt: 




dc.b "[1][ Bitte schön: | eine Alert-Box !][ OK |Quit]" # 0 


even 



;** Unterprogramme ** 


form_alert: 

move 

move 

move 

move 

clr 

move 

move.1 

#52,contrl 
#1,contrl+2 
#1,contrl+4 
#1,contrl+6 
contrl+8 
#1,intin 
dO,addrin 

* Darstellen einer Alert-Box * 
Funktionsnummer: 52 

1 Wert in Int in 

1 Wert in Intout erwartet 

1 Wert Addrin 

kein Wert in Addrout erwartet 
Knopf 1 mit Return wählbar 
Adresse des Alarm-Textes 

move.1 

move 

trap 

#aespb,d1 ; 
#$c8,d0 ; 
#2 ; 

;Adresse der Tabelle 
j'magischer 1 Wert für AES 
;GEM (AES) aufrufen 

move 

rts 

intout,dO ;gewählter Knopf in DO 

;fertig. 
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;*** Tabelle *** 

aespb: dc.l contrl, global, int in, intout,ackJrin,acidrout 

;*** Datenbereich *** 

data 

contrl: blk.w 11 
global: blk.l 8 
intin: blk.w 80 

intout: blk.w 80 
addrin: blk.w 80 
addrout: blk.w 80 


In weiteren Kapiteln dieses Buches werden Sie noch ver¬ 
schiedene andere Programme finden, die das GEM-AES ver¬ 
wenden. Dabei werden z.B. Accessories vorgestellt, mit denen 
Ihnen viele Möglichkeiten offenstehen. Doch betrachten wir 
zunächst die einzelnen AES-Funktionen. 

Die nun folgenden Funktionen des GEM-AES sind mit all ihren 
Parametern für die Programmierung in C vorgegeben. 
Assembler-Programmierer müssen jedoch dieselben Parameter in 
die gleichen Felder (Intin usw.) schreiben. Dabei bedeutet die C- 
Definition INT Wortbreite und LONG Langwortbreite des je¬ 
weiligen Parameters. 

Danach wird mit der Adresse des AES-Parameterblocks im 
Register Dl und dem Wert $C8 in DO über den Befehl TRAP #2 
das AES auf gerufen. 
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WINDOW-Behandlung 


WINDGET OP: 104 

Abfrage diverser Daten über ein Fenster. 


Eingabeparameter: 

control (Standard 0-4) 104,2,5,0,0 

intin(O) Geräte-Identifikationscode 

intin(l) Art der zu übernehmenden Daten (Typ), wie folgt: 

4 = Arbeitsbereich d. Fensters 

5 = Gesamtgröße des Fensters 

6 = Gesamtgröße vorangegangenes Fenster 

7 = Größtmögliche Gesamtgröße (= Wind_Create) 

8 = relative Position Schieber Horizontal (1..1000) 

9 = relative Position Schieber Vertikal (1..1000) 

10 = Window-Handle des aktiven Fensters 

11 = Erstes Rechteck der Fenster-Rechteckliste 

12 = Nächstes Rechteck der Fenster-Rechteckliste 

(xy-Koordinaten Ecke sowie Breite,Höhe) 

13 = reserviert 

14 = reserviert 

15 = Größe des Schiebers Horizontal relativ zur um¬ 

randeten Kastengröße (1-1000, -l=min. Qua¬ 
drat) 

16 = Größe des Schiebers Vertikal relativ zur um 

randeten Kastengröße (1-1000, -l=min. Qua¬ 
drat) 


Ausgabeparameter: 

intout(0) Fehlerüberprüfung (0=Fehler, >0=Kein Fehler) 

intout(l) Rückmeldung (Einzelwertrückgaben) oder x-Ordinate 

intout(2) y-Ordinate (bei mehreren Rückgabewerten) 

intout(3) Breite ( M " ") 

intout(4) Höhe ( " " ") 
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Zugriff: 

C int wi_ghandle; (intin 0) 
int wi_gfield; (intin 1) 
int wi_greturn; (intout 0) 

int wi_gwl, wi_gw2, wi_gw3, wi_gw4; (intout 1..4) 
wi_greturn=wind_get(wi_ghandle, wi_gfield, &wi_gwl, &wi_gw2, 
&wi_gw3, &wi_gw4); 


WINDCREATE OP: 100 

Aufbau eines Fensters einstellen. Dabei können in einem Fenster 
die folgenden Symbole bzw. Funktionen eingebaut werden 
(Übertgabe in einem 12-Bit-Feld: 


Bit 


0 

1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 


Fenstername 
Fenster schließen 
Volle Ausdehnung 
Verschieben 
Information 
Format 

Pfeil nach oben 
Pfeil nach unten 
vertikal schieben 
Pfeil nach links 
Pfeil nach rechts 
horizont. schieben 


(Titelzeile des Fensters) 

(Löschfeld obere linke Ecke) 

(Full Window obere rechte Ecke) 
(Schieberahmen, oberer Balken) 

(Inf ormationsbalken) 

(Fensterformat, rechte untere Ecke) 
(oben rechts, ggf. unter FULL W.) 
(untenm rechts, ggf. über Format) 
(Schieber im waagerechten Rand) 
(linke untere Ecke) 

(Rechte untere Ecke, neben Format) 
(Schieber im senkrechten Rand) 


Eingabeparameter: 

control(0-4) 100,5,1,0,0 


intin (0) 
intin(l) 
intin(2) 
intin(3) 
intin(4) 


Bitmuster für die Fensterkomponenten (Lowbyte) 
x-Ordinate (größtmögliches Fenstermaß) 
y-Ordinate (größtmögliches Fenstermaß) 

Breite (größtmögliche) 

Höhe (größtmögliche) 


Ausgabeparameter: 

intout (0) Kennziffer (wenn <0 keine Fenster verfügbar) 
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Zugriff: 

C int wind_crkind; (intin 0) 
int wi_crwx; (intin 1) 
int wi_crwy; (intin 2) 
int wi_crww; (intin 3) 
int wi_crwh; (intin 4) 
int wi_crreturn; (intout 0) 

wi_crreturn=wind_create(wi_crkind, wi_crwx, wi_crwy, wi_crww, 
wi_crwh); 


WINDOPEN OP: 101 

Öffnen eines Fensters mit den angegebenen aktiven Fensterbe¬ 
reichen und Funktionen. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 


101,5,1,0,0 

Window-Handle (Kennziffer des geöffneten Fensters) 

x-Ordinate 

y-Ordinate 

Breite 

Höhe 


Ausgabeparameter: 

intout (0) Fehlerüberprüfung 

0 = Fehler 
>0 = Kein Fehler 


Zugriff: 

C int wi_ohandle; (intin 0) 
int wi_owx; (intin 1) 
int wi_owy; (intin 2) 
int wi_oww; (intin 3) 
int wi_owh; (intin 4) 
int wi__oreturn; (intout 0) 

wi_oreturn=wind_create(wi_crkind, wi_owx, wi_owy, wi_oww, wi_owh); 
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WINDCLOSE OP: 102 

Schließen eines Fensters mit den angegebenen aktiven Fenster¬ 
bereichen und Funktionen. Das Fenster ist nicht zerstört, es 
kann mit WIND_OPEN wieder reaktiviert werden. 

Eingabeparameter: 

control(0..4) 102,1,1,0,0 

intin(O) Window-Handle (Kennziffer des Fensters) 

Ausgabeparameter: 

intout(O) Fehlerüberprüfung 

0 = Fehler 
>0 = Kein Fehler 

Zugriff: 

C int wi_clhandle;(Eingabeparameter) 
int wi_clreturn;(Ausgabeparameter) 
wi_clreturn=wind_close(wi_clhandle); 


WINDDELETE OP: 103 

Löschen eines Fensters. Der belegte Speicherplatz wird wieder 
freigegeben. Vor dem Löschen muß ein Fenster unbedingt ge¬ 
schlossen werden! 

Eingabeparameter: 

control(0..4) 103,1,1,0,0 

intin(0) Window Handle (Kennziffer des Fensters) 

Ausgabeparameter: 

intout(O) Fehlerüberprüfung 

0 = Fehler 
>0 = Kein Fehler 
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Zugriff: 

C int wi_dhandle;(Eingabeparameter) 
int wi_dreturn;(Ausgabeparameter) 
wi_dreturn=wind_delete(wi_dhandle); 

Bemerkungen: 

Vor dem Löschen eines Fensters ist es unbedingt zu schließen! 


WINDSET OP: 105 

Titelzeile und Fensterrandbereiche können in WIND_CREATE 
gestaltet werden. Diese Funktion ermöglicht eine nachträgliche 
Änderung der Gestaltungskomponenten. 

Eingabeparameter: 

control(0..4) 105,6,1,0,0 

intin(O) Window Handle (Kennziffer des Fensters) 

intin(l) Änderungsart, und zwar: 

1 = intin 2 enthält d. Komponenten-Bitfeld (Create) 

2 = intin 2+3 bilden einen Zeiger, der auf den Namen 

des Fensters (String im Speicher) verweist. 

3 = wie vor, jedoch für die Informationszeile. 

4 = reserviert 

5 = Festlegung des aktuellen Fensters 
6-7 = reserviert 

8 = Position Horizontaler Schieber ändern (relativ) 

9 = Position Vertikaler Schieber ändern (relativ) 

10 = Augenblicklich aktives Fenster festlegen 
11-13 = reserviert 

14 = Neue Desktop-Zeichnungs-Adresse übergeben 

intin 2 + 3 = Adresse Struktur, 4 = Erstes 
Objekt 

15 = Größe des horizontalen Schiebers ändern. 

16 = Größe des vertikalen Schiebers ändern. 

intin(2-5) enthält die Änderungsdaten (s.o.) 
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Ausgabeparameter: 

intout(O) Fehlerüberprüfung 

0 = Fehler 
>0 = Kein Fehler 

Zugriff: 

C int wi_shandle; (intin 0) 
int wi_sfield; (intin 1) 
int wi_swl; (intin 2) 
int wi_8w2; (intin 3) 
int wi_sw3; (intin 4) 
int wi_sw4; (intin 5) 
int wi_sreturn; (intout) 

wi_sreturn=wind_8et(wi_shandle, wi_sfield, wi_swl, wi_sw2, wi_sw3, 
wi_8w4); 


WINDFIND OP: 106 

Ausgabe des "Window Handle" des Fensters, auf das der Grafik- 
Cursor (Maus) zeigt. 

Eingabeparameter: 

control(0..4) 106,2,1,0,0 

intin(0) x-Ordinate Mauszeiger 

intin(l) y-Ordinate Mauszeiger 

Ausgabeparameter: 

intout(0) Window Handle (ermittelte Kennziffer) 

Zugriff: 

C int wi_fmx;(intin 0) 
int wi_fmy; (intin 1) 
int wi_freturn; (intout) 
wi_freturn=wind_find(wi_fmx, wi_fmy); 

Bemerkungen: 

Wenn der Mauszeiger nicht auf ein Fenster zeigt, wird 0 zurück¬ 
gegeben. 



ffe/n'efesys/em-Profframw/erimff 
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WINDUPDATE OP: 107 

Neuaufbau eines Bildschirmbereichs bzw. Übernahme der Maus¬ 
kontrolle durch die Applikation. Im ersten Fall ist kein Be¬ 
nutzerzugriff mehr gestattet. Im zweiten Fall sind die 
Dropdown-Menüs inaktiv und Größe und Positionsänderungen 
werden der Applikation nicht mehr übermittelt. 

Eingabeparameter: 
control(0..4) 107,1,1,0,0 

intin(O) Statusübermittlung: 

1 = Bildaufbau beendet 

2 = Bildaufbau begonnen 

3 = Mauskontrolle nicht mehr beim Benutzer 

4 = Mauskontrolle wieder beim Benutzer 


Ausgabeparameter: 

intout(O) Fehlerüberprüfung (0=Fehler, >0=Kein Fehler) 

Zugriff: 

C int wi_ubegend;(Eingabeparameter) 
int wi_ureturn;(Ausgabeparameter) 
wi_ureturn=wind_update(wi_uebegende); 


WINDCALC OP: 108 

Berechnet anhand der bekannten Größe die fehlende 
(Fensterumriß oder Außenmaße des Arbeitsbereichs). 


Eingabeparameter: 


control(0..4) 

intin(O) 


intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 


108,6,5,0,0 

Art der ausgeführten Funktion 

1 = Fensterumrißmaße berechnen (# 0) 

2 = Fensterarbeitsbereich berechnen (# l) 

Bitfeld der Fensterkomponenten (-> WIND_CREATE) 
x-Ordinate des Arbeitsbereichs bzw. Fensterumrisses 
y-Ordinate des Arbeitsbereichs bzw. Fensterumrisses 
Breite des Arbeitsbereichs bzw. Fensterumrisses 

Höhe des Arbeitsbereichs bzw. Fensterumrisse Ausgabe- 
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intout(O) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 


Parameter: 

Fehlerüberprüfung (0=Fehler, >0=Kein Fehler) 
x-Ordinate des Fensterumrisses bzw. Arbeitsbereichs 
y-Ordinate des Fensterumrisses bzw. Arbeitsbereichs 


Breite des Fensterumrisses bzw. Arbeitsbereichs 
Höhe des Fensterumrisses bzw. Arbeitsbereichs 


Zutritt: 

C int wi_ctype;(intin 0) 


int wi_ckind;(intin 1) 
int wi_cinx;(intin 2) 
int wi_ciny;(intin 3) 
int wi_cinw;(intin 4) 
int wi_cinh;(intin 5) 
int wi_creturn;(intout 0) 
int wi__coutx;(intout 1) 
int wi_couty;(intout 2) 
int wi_coutw;(intout 3) 
int wi_couth;(intout 4) 

wi_creturn=win_calc(wi_ctype, wi_ckind, wi_cinx, wi_cinv, wi_cinw, 
wi_cinh, wi_coutx, wi_couty, wi_coutw, wi_couth); 


Ereignis-Behandlung 


EYNT BUTTON 


OP: 21 


Wartet auf einen Maustastendruck. Der Tastencode und die 
Mausposition wird festgestellt. Außerdem werden die nicht- 
ASCII-Tasten (Shift, Control, Alternate) abgefragt. 

Eingabeparameter: 


control(0..4) 

intin(O) 


21,3,5,0,0 

Maustastenbetätigungen (Clicks), die zu einem resultat 
führen sollen (Anzahl) 
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intin(l) Berücksichtigungs-Maske 

1 = links 

2 = rechts 

3 = beide 

intin(2) Erforderlicher Reaktionszustand 

0 = nicht gedrückt 
1 = gedrückt (norm.) 


Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 


Anzahl der Tastenbetätigungen (Clicks) innerhalb des Be¬ 
messungszeitraumes (Sekundenbruchteil). 
x-Ordinate Mauszeiger beim Clicken. 
y-Ordinate Mauszeiger beim Clicken 

Betätigte Maustasten entsprechend der AND-Bitmaske zu 
intin 1. 

Tastenstatus von Nicht-ASCII-Tasten 
0 = keine Taste 

1 = Shift rechts 

2 = Shift links (oder beliebige Kombinationen 

daraus) 

4 = Control 

5 = Alternate 


Zugriff: 

C int ev_bclicks;(intin 0) 
int ev_bmask;(intin 1) 
int ev_b8tate;(intin 2) 
int ev_breturn;(intout 0) 
int ev_bmx;(intout 1) 
int ev_bmy;(intout 2) 
int ev_bbutton;(intout 3) 
int ev_bkstate;(intout 4) 

ev_breturn=evnt_button(ev_bclicks, ev_bmask, ev_bstate, &ev_bmx, 
&ev_bmy, &ev_bbutton, &ev_bkstate); 
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EVNTDCLICK 

Doppelklick-Geschwindigkeit setzen/abfragen. 


OP: 26 


Eingabeparameter: 


control(0..4) 
intin(O) 
intin (l) 


26,2,1,0,0 

Geschwindigkeit von 0 (langsam) bis 4 (schnell) 
Flag: 1—neuen Wert setzen, 0=alten Wert ermitteln 


Ausgabeparameter: 


intout(O) 


aktuelle Geschwindigkeit 


EVNT KEYBD 


OP: 20 


Es wird auf einen Tastendruck gewartet. Der Code der ge¬ 
drückten Taste wird an intout übergeben (ASCII im Low-Byte, 
Scan-Code im High-Byte). 

Eingabeparameter: 

control(0..4) 20,0,1,0,0 

Ausgabeparameter: 

intout(0) Codierung der gedrückten Taste. 

Zugriff: 

C int ev_kreturn;(Ausgabeparameter) 
ev_kreturn=evnt_keybd(); 

EVNT MOUSE OP: 22 

Wartet, bis sich der Mauspointer innerhalb eines definierten Be¬ 
reichs (Rechteck) befindet oder diesen Bereich verlässt. 

Eingabeparameter: 

control(0..4) 22,5,5,0,0 

intin(O) Prüfen auf Betreten (0) oder Verlassen (1) (Flag) 

intin(l) x-Ordinate Rechteck 
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intin(2) 

intin(3) 

intin(4) 


y-Ordinate Rechteck 

Breite 

Höhe 


Ausgabeparameter: 

intOUt(O) reserviert (=1) 

intout(l) x-Ordinate Mauszeiger 

intout(2) y-Ordinate Mauszeiger 

intout(3) Maustastenstatus (0=keine l=links 2=rechts) 

intout(4) Tastenstatus von Nicht-ASCII-Tasten: 


0 = keine Taste 

1 = Shift rechts 

2 = Shift links (oder beliebige Kombi- 

4 = Control nationen daraus) 

5 = Alternate 


Zugriff: 

C int ev_moflags (intin 0) 


int ev_mox;(intin 1) 
int ev_moy;(intin 2) 
int ev_mowidth;(intin 3) 
int ev_moheight;(intin 4) 
int ev_moresvd;(intout 0) 
int ev_momx;(intout 1) 
int ev_momy;(intour 2) 
int ev_mobutton;(intout 3) 
int ev_mokstate;(intout 4) 

ev_moresvd=evnt_mouse(ev_moflags J ev_mox, ev_moy, ev_mowidth, 
ev_moheight, &ev_momx, &ev_momy, &ev_mobutton, &ev_mokstate); 


EVNT TIMER 


OP: 24 


Pause (warten) für eine bestimmte Zeit. 


Eingabeparameter: 

control(0..4) 24,2,1,0,0 

intin(O-l) 64-Bit-Wert (Pause in 1/1000 Sekunden Dauer) 
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Ausgabeparameter: 

intout(O) reserviert (=1) 

Zugriff: 

C ev_tlocount;(intin 0) 
ev_thicount;(intin 1) 
ev_tresvd;(intout) 

ev_tresvd=evnt_timer(ev_tlocount, ev_thicount); 


EVNT MESAG OP: 23 

Warten auf das Vorliegen einer Nachricht im Ereignisbuffer. 

Eingabeparameter: 

control(0..4) 23,0,1,1,0 

addrin(O) Adresse, an welcher der 16-Byte Nachrichtenbuffer ginnt. 

Ausgabeparameter: 

intout(O) reserviert (=1) 

Zugriff: 

C int ev_mgpbuff;(addrin) 
int ev_mgresvd;(intout) 


EVNT_MULTI OP: 25 

Warten auf eines oder mehrere Ereignisse. Auf welche Ereignisse 
geprüft werden soll, wird in einem Bitmuster festgelegt: 

Bit 

0 Tastatur 

1 Maustasten 

2 Mausbereich I (definiertes Rechteck) 

3 Mausbereich II (definiertes Rechteck) 

4 Das Vorhandensein einer Nachricht im Ereignisbuffer 

5 Timer 
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Eingabeparameter: 


control(0..4) 

25,16,7,1,0 

intin(O) 

Bitmaske für Ereignisüberprüfung, s.o. von 

EVNT_BUTTON: 

intin(l) 

Maustastenbetätigungen (Clicks), die zu einem resultat 
führen sollen (Anzahl) 

intin(2) 

Berücksichtigungs-Maske 

1 = links 

2 = rechts 

3 = beide 

intin(3) 

Erforderlicher Reaktionszustand 

0 = nicht gedrückt 

1 = gedrückt (norm.) 

intin(4) 

Prüfen auf Betreten (0) oder Verlassen (l) (Flag) (von 
EVNT_MOUSE 1. Rechteck) 

intin(5) 

x-Ordinate Rechteck 

intin(6) 

y-Ordinate Rechteck 

intin(7) 

Breite 

intin(8) 

Höhe 

intin(9) 

Prüfen auf Betreten (0) oder Verlassen (1) (Flag) (von 
EVNT_MOUSE 2. Rechteck) 

intin(lO) 

x-Ordinate Rechteck 

intin(ll) 

y-Ordinate Rechteck 

intin(l2) 

Breite 

intin(l3) 
intin(14) bis 

Höhe 

intin(l5) 

64-Bit-Wert (Pause in 1/1000 Sekunden Dauer) (von 
EVNT_TIMER) 

addrin(O) 

Adresse, an welcher der 16-Byte Nachrichtenbuffer beginnt, 
(von EVNT_MESAG:) 

Ausgabeparameter: 

intout(o) 

Aufgetretene Ereignisse (intin 0 AND stattgefundene Ereig¬ 
nisse) von EVNT_BUTTON: 

intout(l) 

x-Ordinate Mauszeiger 

intout(2) 

y-Ordinate Mauszeiger 

intout(3) 

Maustastenstatus (0=keine l=links 2=rechts) 
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intout(4) 


Tastenstatus von Nicht-ASCII-Tasten: 

0 = keine Taste 

1 = Shift rechts 

2 = Shift links (oder beliebige Kombi- 

4 = Control nationen daraus) 

5 = Alternate 


intout(5) 

intout(6) 


Anzahl der zum Ereignis führenden Maustastenbetätigungen. 


Gedrückte Taste 


Zugriff: 

C ev_mflag8;(intin 0) 


ev_mbclicks;(intin 1) 
ev_mbma8k;(intin 2) 
ev_mbstate;(intin 3) 
ev_mmlflags;(intin 4) 
ev_mmlx;(intin 5) 
ev_mmly;(intin 6) 
ev_mmlwidth;(intin 7) 
ev_mmlheight;(intin 8) 
ev_mm2flags;(intin 9) 
ev_mm2x;(intin 10) 
ev_mm2y;(intin 11) 
ev_mm2width;(intin 12) 
ev_mm2height;(intin 13) 
ev__mtlocount;(intin 14) 
ev_mthicount;(intin 15) 
ev__mmgpbuff;(addrin) 
ev_mwhich;(intout 0) 
ev_mmox;(intout 1) 
ev_mmoy;(intout 2) 
ev_mmobutton;(intout 3) 
ev_mmokstate;(intout 4) 
ev_mkreturn;(intout 5) 
ev_mbreturn;(intout 6) 

ev_mwhich=evnt_multi(ev_flags, ev_mbclicks, ev_mbmask, ev_mbstate, 
ev_mmlflags, ev_mmlx, ev_mmly, ev_mmlwidth, ev_mmlheight, 
ev_mm2flags, ev_mm2x, ev_mm2y, ev_mm2width, ev_mm2height, 
ev_mmgpbuff, ev_mtlocount, ev_mmthicount, &ev_mmox, &ev_mmoy, 
<kev_mmobutton, &ev_mmokstate, &ev_mkreturn, &ev_mbreturn; 



Betriebssystem-Programmierung 


339 


Applikations-Behandlung 

APPLEXIT OP: 19 

Abmelden der Applikation, Freigabe der Application-ID. 

Eingabeparameter: 

control(0..4) 19,0,1,0,0 

Ausgabeparameter: 

intout(O) Status: 0=Fehler, >0=OK 

Zugriff: 

C int ap_xreturn; 

ap_xreturn=appl_exit(); 


APPLFIND OP: 13 

Identifikationsnummer (ID) einer parallel laufenden Applikation 
ermitteln. 

Eingabeparameter: 

control(0..4) 13,0,1,1,0 

addrin(0) Adresse des Filenamen der zu suchenden Applikation 

Ausgabeparameter: 

intout(0) Applikations-Identifikationscode 

Zugriff: 

C int ap_fid; 

ap_fid=appl_find(ap_filename); 
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APPLINIT OP: 10 

Initialisierung der AES-Bibliotheken. Erst nach Durchführung 
dieser Routine sind die anderen für den Benutzer verfügbar. 

Eingabeparameter: 

control(0..4) 10,0,1,0,0 

Ausgabeparameter: 

intout(O) Applikations-Identifikationscode 

Zugriff: 

C int ap_id; 

ap_id=appl_ini t (); 

Bemerkungen: 

Der Applikations-Identifikationscode ist z.Z. noch ohne Bedeu¬ 
tung, da nur eine Applikation geladen ist. Bei der vorliegenden 
Applikation wird er auf -1 ($FFFF) gesetzt. 


APPLREAD OP: 11 

Lesen einer Anzahl von Bytes aus einem Ereignisbuffer. 


Eingabeparameter: 


control(0..4) 

intin(0) 

intin(l) 

addrin(0) 


11 , 2 , 1 , 1,0 

Applikations-Identifikationscode (hFFFF) 
Anzahl der zu lesenden Bytes 

Bufferadresse mit den zu lesenden Bytes 


Ausgabeparameter: 

intout(0) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int ap_rid;(intin 0) 

int ap__rlenght;(intin l) 
int ap_rpbuff;(addrin) 
int ap_rreturn;(intout) 

ap__rreturn=appl_read(ap_rid,ap_rlenght,ap_rpbuff); 
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APPLTRECORD OP: 15 

Speichern aller Ereignisse (Events), die auftreten. Mit 
APPL_TPLAY können diese Ereignisse wieder "abgespielt" wer¬ 
den. 

Eingabeparameter: 

control(0..4) 15,1,1,1,0 

intin(O) Anzahl der zu speichernden Events 

addrin(O) Adresse des Speichers für die Events 

Ausgabeparameter: 

intout(O) Anzahl der aufgezeichneten Ereignisse 

Zugriff: 

C int ap_trcount, ap_trreturn; 

ap_trreturn=appl_trecord(ap_trmem, ap_trcount); 


APPLTPLAY OP: 14 

Abspielen der mit APPL_TRECORD auf genommenen Folge von 
Ereignissen. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

addrin(O) 


14,2,1,1,0 

Anzahl der abzuspielenden Ereignisse 
Abspiel-Geschwindigkeit (0-1000) 

Adresse der gespeicherten Ereignisse 


Ausgabeparameter: 

intout(O) immer 1 

Zugriff: 

C int ap_tpnum, ap_tpscale; 

ap_tpreturn=appl_tplay(ap_tpmem, ap_tpnum, ap_tpscale); 
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APPLWRITE OP: 12 

Schreiben einer Anzahl von Bytes in einen Ereignisbuffer. 


Eingabeparameter: 

control(0..4) 12,2,1,1,0 

intin(O) Applikations-Identifikationscode (hFFFF) 

intin(l) Anzahl der zu schreibenden Bytes 


addrin(O) 


Bufferadresse, an welche die Bytes geschrieben werden 
sollen. 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler l=kein Fehler) 

Zugriff: 

C int ap_wid;(intin 0) 

int ap_wlenght;(intin 1) 
int ap_wpbuff;(addrin) 
int ap_wreturn;(intout) 

ap_wreturn=appl_write(ap_wid,ap_wlenght,ap_wpbuff); 


Objektbehandlung 


OBJC ADD OP: 40 

Einfügen eines Objekts in einen Objektbaum. 


Eingabeparameter: 

control(0..4) 40,2,1,1,0 


intin(0) 

intin(l) 

addrin(0) 


Index des Objekts, an das angefügt werden soll 
Index des neuen Objektes 

Adresse des Objektbaumes 


Ausgabeparameter: 

intout(0) Status: 0=Fehler, l=OK 
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Zugriff: 

C int ob_aparent, ob__achild; 

ob_areturn=objc_add(ob_atree, ob_aparent, ob_achild); 


OBJC CHANGE OP: 47 

Ändern des Aussehens des Objektes in der Begrenzung. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 

intin(6) 

intin(7) 

addrin(O) 


47,8,1,1,0 

Objekt (Index), das geändert werden soll 

reserviert (muß 0 sein) 

x-Ordinate Begrenzungskasten 

y-Ordinate Begrenzungskasten 

Begrenzungskasten-Breite 

Begrenzungskasten-Höhe 

Neuer Objektstatus 

Zeichnungsflag (0=nicht neu zeichnen l=neu zeichnen) 
Objektbaum (Adresse) 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int ob_cobject;(intin 0) 
int ob_cresvd;(intin 1) 
int ob_cxclip;(intin 2) 
int ob_cyclip;(intin 3) 
int ob_cwclip;(intin 4) 
int ob_chclip;(intin 5) 
int ob_cnewstate;(intin 6) 
int ob_credraw;(intin 7) 
int ob_ctree;(addrin) 
int ob_creturn;(intout) 

ob_creturn=objc_change(ob_ctree, ob_cobject, ob_crescvd, ob__cxclip, 
ob_cyclip, ob_cwclip, ob_chclip, ob_cnewstate, ob_credraw); 
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OBJC_DELETE OP: 41 

Nimmt ein Objekt aus einer Baumstruktur heraus (löscht es). 

Eingabeparameter: 

control(0..4) 41,1,1,1,0 

intin(O) Index des zu löschenden Objekts 

addrin(O) Adresse des Objektbaumes 

Ausgabeparameter: 

intout(O) Status: 0=Fehler, l=OK 

Zugriff: 

C int ob_dlobject, ob_dlreturn; 

ob_dlreturn=objc_delete(ob_dltree, ob_dlobject); 


OBJC_DRAW OP: 42 

Zeichnen eines Objektbaumes innerhalb von festzulegenden 
Zeichengrenzen und einer Objektbaumstrukturebene. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 

addrin(O) 


42,6,1,1,0 

Index des zuerst zu zeichnenden Objektes 

Anzahl der Strukturebenen 

x-Ordinate Rechteckbegrenzung 

y-Ordinate Rechteckbegrenzung 

Rechteckbreite 

Rechteckhöhe 

Objektbaum-Adresse 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler l=kein Fehler) 

Zugriff: 

C ob_drstartob;(intin 0) 
ob_drdepth;(intin 1) 
ob_drxclip;(intin 2) 
ob_dryclip;(intin 3) 
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ob_drwclip;(intin 4) 
ob_drhclip;(intin 5) 
ob_drtree;(addrin), 
ob_drreturn;(intout) 

ob_drretum=objc_draw(ob_drtree, ob_drstartob, ob_drdepth, 
ob_drxclip, ob_dryclip, ob_drwclip, ob_drhclip); 


OBJC_EDIT OP: 46 

Eingabe eines Textes in ein Objekt vom Typ G_TEXT oder 
G BOXTEXT. 


Eingabeparameter: 

control(0..4) 46,4,2,1,0 


intin(O) 

intin(l) 

intin(2) 

intin(3) 


Objekt (Index) mit dem einzugebenden Text 
Zeicheneingabe 

Nächste Zeichenposition im Text 
Editiermodus (0=reserviert, 1..3) 


addrin(O) 


Objektbaum (Adresse) 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

intout(l) Nächste Zeichenposition nach dem Aufruf (Nummer) 

Zugriff: 

C int ob_edobject;(intin 0) 
int ob_edchar;(intin 1) 
int ob_edidx;(intin 2) 
int ob_edkind;(intin 3) 
int ob_edtree;(addrin) 
int ob_ed_return;(intout 0) 
int ob_ednewidx;(intout 1) 

ob_edreturn=objc__edit(ob_edtree, ob_edobject, ob_edchar, ob_edidx, 
ob_edkind, ob_ednewidx); 

Bemerkungen: 

Die Funktion muß dreimal hintereinander mit unterschiedlichen 

Werten für den Editiermodus aufgerufen werden. 
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OBJC FIND OP: 43 

Ermittlung des Objektes unter dem Mauspointer. Der Startpunkt 
wird angegeben. 


Eingabeparameter: 

control(0..4) 43,4,1,1,0 


intin(O) 

intin(l) 

intin(2) 

intin(3) 


Objekt (Index); bei dem die Suche beginnt 
Anzahl der abzusuchenden Strukturebenen 
x-Ordinate Mauspointer 
y-Ordinate Mauspointer 


addrin(O) 


Baum (Adresse), in dem gesucht werden soll 


Ausgabeparambter: 

intout(O) Objekt (Index); auf dem sich der Mauspointer befindet 

(wenn kein Objekt, dann -1) 

Zugriff: 

C int ob_f8tartob;(intin 0) 
int ob_fdepth;(intin 1) 
int ob_fmx;(intin 2) 
int ob_fmy;(intin 3) 
int ob_ftree;(addrin) 
int ob_fobnum;(intout) 

ob_fobnum=objc__find(ob_ftree,ob_fstartob,ob_fdepth,ob_fmx,ob__fmy); 


OBJC OFFSET OP: 44 

Ermittelt die Objektkoordinaten relativ zum Bildschirm-Null¬ 
punkt. 

Eingabeparameter: 

control(0..4) 44,1,3,1,0 

intin(O) Objekt (Index), dessen Position gefunden werden soll 

addrin(O) Objektbaum (Adresse) 
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Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

intout(l) relative x-Ordinate zum Bildschirmnullpunkt 

intout(2) relative y-Ordinate zum Bildschirmnullpunkt 

Zugriff: 

C int ob_ofobject;(intin) 
int ob_oftree;(addrin) 
int ob_ofreturn;(intout 0) 
int ob_ofxoff;(intout 1) 
int ob_ofyoff;(intout 2) 

ob_ofreturn=objc_offset(ob_oftree,ob_ofobject,&ob_ofxoff,&ob_ofyoff); 


OBJC_ORDER OP: 45 

Verschieben eines Objekts innerhalb der logischen Baumstruktur. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 


45,2,1,1,0 

Index des zu verschiebenden Objekts 
neue Position des Objekts 


addrin(O) 


Adresse des Objektbaumes 


Ausgabeparameter: 

intout(O) Status: 0=Fehler, l=OK 


Objektbaumstruktur-Behandlung 


RSRCFREE OP: 111 

Der mit der Objektbaumstruktur besetzte Speicher 
(RSRC_LOAD) wird wieder freigegebe. Der Objektbaum ist 
danach nicht mehr zugänglich. 
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Eingabeparameter: 

control(0..4) 111,0,1,0,0 

Ausgabeparameter: 


intout(O) 


Fehlerkontrolle (0=Fehler l=kein Fehler) 



re_freturn=rsrc_free(); 


RSRC GADDR 


OP: 112 


Ermittlung der Datenstrukturadresse von Objektbäumen oder 
objektspezifischen Informationen. 


Eingabeparameter: 

control(0..4) 112,2,1,0,1 


intin(O) 


Art der gesuchten Datenstruktur(-adresse): 


0 = mit RSRC_LOAD geladene Baumstruktur 

1 = Objekt 

2 = Text 

3 = Piktogramm 

4 = Bitmustergrafik 

5 = String-Text 

6 = Bitmustergrafik-Zeiger 

7 = Objektspezifizierung 

8 = Text-Zeiger 

9 = Textschablone-Zeiger 

10 = Textabgabebegrenzungsstring-Zeiger 

11 = Piktogramm Darstellungsmaske 

12 = Piktogramm Bitmuster 

13 = Piktogramm Text 

14 = Bitmustergrafik_Zeiger 

15 = Freier String - Zeiger 

16 = Freie Bitmustergrafik - Zeiger 


Objekt (Index) 


intin(l) 
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Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

addrout(O) Datenstrukturadresse 

Zugriff: 

C int re_gtype;(intin 0) 
int re_gindex;(intin 1) 
int re_greturn;(intout) 
int re_gaddr;(addrout) 

re_greturn=rsrc_gaddr(re_gtype,re_gindex,re_gaddr); 


RSRCLOAD OP: 110 

Es wird Speicherplatz freigegeben und in diesen eine Objekt¬ 
baumstruktur geladen. Der für den Eingabeparameter not¬ 
wendige String muß mit hOO abgeschlossen werden. 

Eingabeparameter: 

control(0..4) 110,0,1,1,0 

addrin(O) Pointer auf den Dateinamen-String. 

Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int re__lpfname;(addrin) 
int re__lreturn;(intout) 
re_lreturn=rsrc_load(re_lpfname); 


RSRC_OBFIX OP: 114 

Umwandeln der Koordinaten eines Objektes von Zeichen- auf 
Pixel-Format (geschieht automatisch bei RSRC_LOAD). 
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Eingabeparameter: 

control(0..4) 114,1,1,1,0 

intin(O) Index des betreffenden Objekts 

addrin(O) Adresse des Objektbaumes 

Ausgabeparameter: 

intout(O) reserviert 

Zugriff: 

C int re_oresvd, re_oobject; 

re_oresvd=rsrc_obfix(re_otree, re_oobject); 


RSRCSADDR OP: 113 

Speicherung einer Datenstrukturadresse in einer objekt¬ 
spezifischen Datenstruktur. 

Eingabeparameter: 

control(0..4) 113,2,1,1,0 

intin(O) Art der zu speichernden Datenstruktur(-adresse): 

0 = mit RSRC_LOAD geladene Baumstruktur 

1 = Objekt 

2 = Text 

3 = Piktogramm 

4 = Bitmustergrafik 

5 = String-Text 

6 = Bitmustergrafik-Zeiger 

7 = Objektspezifizierung 

8 = Text-Zeiger 

9 = Textschablone-Zeiger 

10 = Textabgabebegrenzungsstring-Zeiger 

11 = Piktogramm Darstellungsmaske 

12 = Piktogramm Bitmuster 





351 


13 = Piktogramm Text 

14 = Bitmustergrafik_Zeiger 

15 = Freier String - Zeiger 

16 = Freie Bitmustergrafik - Zeiger 

intin(l) Objekt (Index) 

addrin(O) Datenstrukturadresse 

Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=Kein Fehler) 

Zugriff: 

C int re__stype;(intin 0) 
int re_8index;(intin l) 

int re_saddr;(addrin) int re_sreturn;(intout) 
re_sreturn=rsrc_saddr(re_8type,re_8index,re_saddr); 


Verwaltung von Formularen 


FSEL INPUT OP: 90 

Darstellung und Verwaltung des File-Selectors. 

Eingabeparameter: 

control(0..4) 90,0,2,2,0 

addrin(0) Adresse des Pfadnamens (Abschluß mit 0) 

addrin(l) Adresse des Filenamens (Abschluß mit 0) 

Ausgabeparameter: 

intout(0) Status: 0=Fehler, l=OK 

intout(l) Betätigte Rückgabetaste (l=OK, 0=Abbruch) 

Zugriff: 

C int f8_ireturn, fs_iexbutton; 

f8_ireturn=f8el_input(f8_iinpath, fs_iinsel, &fs_iexbutton); 
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FORM ALERT OP: 52 

Eine Warnmeldung wird ausgegeben. FORM_ALERT ruft 
gleichzeitig OBJC_DRAW und FORM_DO auf. Bis zu drei 
"Knöpfe", die dann bei Betätigung eine bestimmte Reaktion ver¬ 
ursachen, können dargestellt werden. Es wird auf eine 
Benutzereingabe gewartet (siehe auch Beispielprogramm). 

Eingabeparameter: 

control(0..4) 52,1,1,1,0 

intin(O) Return-Taste simuliert: 

0 = keinen Knopf 

1 = ersten Knopf 

2 = zweiten Knopf 

3 = dritten Knopf 

addrin(O) Adresse zum Warnmeldungs-String 

Ausgabeparameter: 

intout(O) Betätigter Bestätigungsknopf (1..3) 

Zugriff: 

C int fo_adefbttn;(intin) 
int fo_astring;(addrin) 
int fo_aexbttn;(intout) 

fo_aexbttn=form_alert(fo_adefbttn, fo_astring); 


FORM BUTTON OP: 56 

Überwachung der Maustasten, ähnlich wie FORM_KEYBD. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

addrin(O) 


56,2,1,1,0 

Objekt, das sich unter dem Mauszeiger befindet 
Anzahl der Mausklicks 
Adresse der Baumstruktur 
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Ausgabeparameter: 

intout(O) Status: 

0 = es wurde EXIT gewählt 
>0 = noch nicht fertig 

Zugriff: 

C int fo_breturn, fo_bob, fo_bclks; 

fo_breturn=form_button(fo_btree, fo_bob, fo_bclks, &fo_bobnxt); 


FORM CENTER OP: 54 

Berechnung der Koordinaten eines bestimmten Objektbaums. Im 
Fall einer Bildschirmdarstellung erscheint dieser in der Mitte. 


Eingabeparameter: 

control(0..4) 54,0,5,1.0 

addrin(O) Baumstruktur-Adresse, dessen Koordinaten berechnet wer- 

den sollen. 


Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 


reserviert (=1) 
Zentrierte x-Ordinate 
Zentrierte y-Ordinate 
Breite 
Höhe 


Zugriff: 

C int fo_ctree;(addrin) 
int fo_cresvd;(intin 0) 
int fo_cx;(intin 1) 
int fo_cy;(intin 2) 
int fo_cw;(intin 3) 
int fo_ch;(intin 4) 

fo_cresvd=form_center(fo_tree, &fo__cx, &fo__cy, &fo_cw, &fo_ch); 


* 
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FORM DI AL OP: 51 

Für die Verwaltung von Formularen sind die folgenden Funk¬ 
tionen (in der angegebenen Reihenfolge) erforderlich. Welche 
Funktion ausgeführt werden soll, muß an intin(O) übergeben 
werden. 


0 = Bildschirmspeicherbereich reservieren 

1 = sich ausdehnendes Rechteck zeichnen 

2 = sich verkleinerndes Rechteck zeichnen 

3 = reservierten Speicherbereich freigeben. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 

intin(6) 

intin(7) 

intin(8) 


51,9,1,1,0 

Auszuführende Funktion, s.o. 

x-Ordinate des am kleinsten ausgedehnten Rechtecks 
y-Ordinate des am kleinsten ausgedehnten Rechtecks 
Breite des am kleinsten ausgedehnten Rechtecks 
Höhe des am kleinsten ausgedehnten Rechtecks 
x-Ordinate des am größten ausgedehnten Rechtecks 
y-Ordinate des am größten ausgedehnten Rechtecks 
Breite des am größten ausgedehnten Rechtecks 
Höhe des am größten ausgedehnten Rechtecks 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler, >0=kein Fehler) 

Zugriff: 

C int fo_diflag;(intin 0) 
int fo_dilittlx;(intin 1) 

int fo_dilittly;(intin 2) 

int fo_dilittlw;(intin 3) 
int fo_dilittlh;(intin 4) 
int fo_dibigx;(intin 5) 
int fo_dibigy;(intin 6) 
int fo_dibigw;(intin 7) 
int fo_dibigh;(intin 8) 

fo_direturn=form_dial(fo_diflah, Anfangs-x, Anfangs-y, Anfangsbreite, 
Anfangshöhe); 
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FORM DO OP: 50 

Übergabe der Programmkontrolle an AES zur Überwachung der 
Benutzereingaben im Formular. 

Eingabeparameter: 

control(0..4) 50,1,1,1)0 

intin(O) Formularaufbau (0=keine Textfelder im Formular n=Anzahl 

der Textfelder im Formular) 

addrin(O) Objektbaumadresse 

Ausgabeparameter: 

intout(O) Vom Benutzer angewähltes Objekt (Index) 

Zugriff: 

C int fo_dostartob;(intin) 
int fo_dotree;(addrin) 
int fo_doreturn;(intout) 

fo_doreturn=form_do(fo_dotree, fo_dostartob); 


FORM ERROR OP: 53 

Eine Fehlermeldung wird ausgegeben. Es wird ein Alarmfenster 
mit der Fehlernummer ausgegeben. Als Bestätigungstaste steht 
ein CANCEL-Feld zur Verfügung. Es wird auf eine 
Benutzereingabe gewartet. 

Eingabeparameter: 

control(0..4) 53,1,1,0,0 

intin(0) Aufgetretener Fehler (nur TOS-Fehler) 

Ausgabeparameter: 

intout(0) Betätigte Rückgabetaste (nur 1 ist möglich) 

Zugriff: 

C int fo_enum; (intin) 

int fo_eexbttn;(intout) 
fo_eexbttn=form_error(fo_enum); 
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FORMJKEYBD OP: 55 

Kontrolle von Formulareingaben, Unterroutine von FORM_DO. 


Eingabeparameter: 

control(0..4) 55,3,2,1,0 


intin(O) 

intin(l) 

intin(2) 


Edit-Objekt, in dem sich der Cursor befindet 
nächstes Objekt 
eingegebenes Zeichen 


addrin(O) 


Adresse der Baumstruktur 


Ausgabeparameter: 


intout(O) Status: 

0 = es wurde EXIT gewählt 
>0 = noch nicht fertig 
intout(l) neues Edit-Objekt 

intout(2) Text-Zeichen (=0, wenn Steuerzeichen) 

Zugriff: 

C int fo_kreturn, fo_kob, fo_kobnxt, fo_kchar; 
int fo_koboutnxt, fo_koutchar; 

fo_kreturn=form_keybd(fo_ktree, fo_kob, fo__kobnxt, fo_kchar, 
&fo_koboutnxt, &fo_koutchar); 


Pull-Down- 

■Menü Handhabung 


MENU BAR 


OP: 30 

Darstellen oder Löschen der Menüleiste eines Menüobjektbaums. 

Eingabeparameter: 


control(0..4) 

30,1,1,1,0 


intin(O) 

Aktionsflag (0=löschen l=darstellen) 


addrin(O) 

Menüobjektbaum-Adresse 



Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 
































































































Betriebssystem-Programmierung 


357 


Zugriff: 

C int me_bshow;(intin) 
int me_btree;(addrin) 
int me_breturn;(intout) 

me_breturn=menu__bar(me_btree, me_bshow); 


MENU_ICHECK OP: 31 

Löschen oder Darstellen eines Prüfsymbols (der OK-Haken, der 
neben einem Menuepunkt zum Zeichen seiner Aktivierung er¬ 
scheinen kann). 


Eingabeparameter: 

control(0..4) 31,2,1,1,0 


intin(O) 

intin(l) 

addrin(O) 


Menueeintrag-Nummer 

Darstellungs-Flag (0=nicht darstellen l=darstellen) 
Menüobjektbaum-Adresse 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int me_citem;(intin 0) 
int me_ccheck;(intin 1) 
int me_ctree;(addrin) 
int me_creturn;(intout) 

me_creturn=menu__icheck(me_ctree, me_eitern, me_ccheck); 
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MENU IENABLE OP: 32 

Einzelne Menüpunkte können dem Benutzerzugriff entzogen 
werden. Der Menüpunkt erscheint dann in LIGHT-Schrift. 


Eingabeparameter: 

control(0..4) 32,2,1,1,0 


intin(O) Menueeintrag-Nummer 

intin(l) Aktivitäts-Flag (0=LIGHT-Schrift l=aktiviert) 


addrin(O) 


Menüobjektbaum-Adresse 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int me_eitem;(intin 0) 
int me_echeck;(intin 1) 
int me_etree;(addrin) 
int me_ereturn;(intout) 

me_ereturn=menu_ienable(me_etree, me_eitem, me_echeck); 


MENU_TNORMAL OP: 33 

Menütitel können auch in umgekehrter Schriftart (bei mono¬ 
chrom weiße Schrift auf schwarzem Balken) dargestellt werden, 
um die Auswahl kenntlich zu machen. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

addrin(O) 


33,2,1,1,0 

Menütitel-Nummer 
Darstellungsflag (0=revers l=normal) 
Objektbaummenü - Adresse 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 
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Zugriff: 

C int me_ntitle;(intin 0) 

int me_nnormal;(intin 1) 
int me_ntree;(addrin) 
int me_nreturn;(intout) 

me_nreturn=menu_tnormal(me_ntree, me_ntitle, me_nnormal); 


MENU_TEXT OP: 34 

Änderung von Texten im Menüeintrag. Der neue Text darf nicht 
länger als der alte Text sein (sonst Zerstörung der Menübaum¬ 
struktur), und der String muß mit 0 abgeschlossen werden. 


Eingabeparameter: 


control(0..4) 

intin(O) 

addrin(O) 

addrin(l) 


34,1,1,2,0 

Menüeintrag-Nummer 

Menüobjektbaum-Adresse 
Adresse des neuen Eintragtextes. 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int me_titem;(intin) 

int me_ttree;(addrin 0) 
int me_ttext;(addrin 1) 
int me_treturn;(intout) 

me_treturn=menu_text(me_ttree, me_titem, me_ttext); 
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MENU_REGISTER OP: 35 

Aktivierung eines Desk Accessory-Namen im ersten Menükasten. 

Eingabeparameter: 

control(0..4) 35,1,1,1,0 

intin(O) Applikations-Identifikationscode (-> APPL_INIT) (hier: 

Prozessidentifizierung) 

addrin(l) Zeiger auf den Desk-Accessory-Namen (Ende 0) 

Ausgabeparameter: 

intout(O) Desk-Accessory-Nummer (0..5, -l=keine vorhanden) 

Zugriff: 

C int me_rapid;(intin) 

int me_rp8tring;(addrin) 
int me_rmenuid;(intout) 

me_rmenuid=menu_register(me_rapid, me_rpstring); 


Grafik-Behandlung 


GRAF HANDLE OP: 77 

Grafik-Handle ermitteln. Diese Funktion ist vor der Durch¬ 
führung von Grafikfunktionen erforderlich. 

Eingabeparameter: 

control(0..4) 77,0,5,0,0 

Ausgabeparameter: 

intout(0) Handle 

intout(l) Buchstabenbreite 

intout(2) Buchstabenhöhe 

intout(3) Breite der gedachten Box um den Buchstaben 

intout(4) Höhe der gedachten Box um den Buchstaben 



Betriebssystem-Programmierung 


361 


Zugriff: 

C int gr_handle;(intout 0) 
int gr__hwchar;(intout 1) 
int gr_hhchar;(intout 2) 
int gr_hwbox;(intout 3) 
int gr_hhbox;(intout 4) 

gr_handle=graf__handle(&gr_hwchar, &gr_hhchar, &gr_hwbox, 

&gr_hhbox); 

Bemerkungen: 

Intout(l)-(4) sind systemspezifische Informationen. Das Handle 
in intin(O) hingegen ist wichtig und sollte für spätere Benutzung 
gespeichert werden. 


GRAF RUBBERBOX OP: 70 

Markiert die linke obere Ecke eines Rechtecks und folgt (wobei 
die linke obere Ecke stehen bleibt) den Bewegungen der Maus. 
Nach dem Loslassen der linken Maustaste ergibt die Mauszeiger¬ 
position die rechte untere Ecke, und die Größe des Rechtecks 
wird übergeben. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 


70,4,3,0,0 

x-Ordinate linke obere Ecke 
y-Ordinate linke obere Ecke 
Kleinstmögliche Rechteckbreite 
Kleinstmögliche Rechteckhöhe 


Ausgabeparameter: 

intout(0) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

intout(l) Rechteckbreite nach Loslassen der Maustaste 

intout(2) Rechteckhöhe nach Loslasen der Maustaste 

Zugriff: 

C int gr_rx; (intin 0) 
int gr_ry;(intin 1) 
int gr__rminwidth;(intin 2) 
int gr_rminheight;(intin 3) 
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int gr_rreturn;(intout 0) 
int gr_rlastwidth;(intout 1) 
int gr_rlastheight;(intout 2) 

gr_rreturn=graf_rubberbox(gr_rx, gr_ry, gr_rminwidth, gr_rminheight, 
&gr_rlastwidth, &gr_rlastheight); 


GRAF DRAGBOX OP: 71 

Bewegen eines Rechtecks innerhalb eines zweiten mittels des 
Mauszeigers. Nach dem Loslassen der linken Maustaste steht das 
verschiebbare Rechteck wieder fest. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 

intin(6) 

intin(7) 


71,8,3,0,0 

Rechteckbreite (verschiebbar) 
Rechteckhöhe (verschiebbar) 
x-Ordinate verschiebbares Rechteck 
y-Ordinate verschiebbares Rechteck 
x-Ordinate feststehendes Rechteck 
y-Ordinate feststehendes Rechteck 
Rechteckbreite (feststehend) 
Rechteckhöhe (feststehend) 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

intout(l) x-Ordinate (neu) des verschiebbaren Rechtecks 

intout(2) y-Ordinate (neu) des verschiebbaren Rechtecks 

Zugriff: 

C int gr__dwidth;(intin 0) 
int gr_dheight;(intin 1) 
int gr_dstartx;(intin 2) 
int gr_dstarty;(intin 3) 
int gr_dboundx;(intin 4) 
int gr_dboundy;(intin 5) 
int gr_dboundw;(intin 6) 
int gr_dboundh;(intin 7) 
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int gr_dreturn;(intout 0) 
int gr_dfini8hx;(intout 1) 
int gr_dfinishy;(intout 2) 

gr_dreturn=graf_dragbox(gr_dwidth, gr_dheight, gr_dstartx, gr_dstarty, 
gr_dboundx, gr_dboundy, gr_dboundw, gr_dboundh, &gr_dfinishx, 
&gr_dfinishy); 


GRAF MOVEBOX OP: 72 

Zeichnen eines Rechtecks, welches sich von einer Position zu 
einer anderen fortbewegt und dort stehenbleibt. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 


72,6,1,0,0 

Rechteckbreite 
Rechteckhöhe 
x-Ordinate Startposition 
y-Ordinate Startposition 
x-Ordinate Endposition 
y-Ordinate Endposition 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 


Zugriff: 

C int gr__mwidth; (intin 0) 
int gr_mheight;(intin 1) 
int gr_m8ourcex;(intin 2) 
int gr_msourcey;(intin 3) 
int gr_destx;(intin 4) 
int gr_desty;(intin 5) 
int gr_mreturn;(intout) 

gr_mreturn=graf_movebox(gr_mwidth, gr_mheigt, gr_msourcex, 
gr_msourcey, gr_mdestx, gr_mdesty); 
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GRAFGROWBOX OP: 73 

Zeichnen eines sich ausdehnenden Rechtecks. Angegeben werden 
die Maße für die maximale und minimale Größe. 


Eingabeparameter: 

control(0..4) 73,8,1,0,0 


intin(O) 

intin(l) 

intin(2) 

intin(3) 

intin(4) 

intin(5) 

intin(6) 

intin(7) 


x-Ordinate Rechteck (klein) 
y-Ordinate Rechteck (klein) 
Breite Rechteck (klein) 

Höhe Rechteck (klein) 
x-Ordinate Rechteck (groß) 
y-Ordinate Rechteck (groß) 
Breite Rechteck (groß) 

Höhe Rechteck (groß) 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int gr_gstx; (intin 0) 
int gr_gsty; (intin 1) 
int gr_gstwidth; (intin 2) 
int gr_gstheight; (intin 3) 
int gr_gfinx; (intin 4) 
int gr_gfiny; (intin 5) 
int gr_gfinwidth; (intin 6) 
int gr_gfinheight; (intin 7) 
int gr_greturn; (intout) 

gr_greturn=graf_growbox(gr_gstx, gr_gsty, gr_gstwidth, gr_gstheight, 
gr_gfinx, gr_gfiny, gr_gfinwidth, gr_gfinheight); 
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GRAFSHRINKBOX OP: 74 

Zeichnen eines kleiner werdenden Rechtecks. Angegeben werden 
die Maße für minimale und maximale Größe. 

Eingabeparameter: 


control(0..4)f 

74,8,1,0,0 

intin(O) 

x-Ordinate Rechteck (klein) 

intin(l) 

y-Ordinate Rechteck (klein) 

intin(2) 

Breite Rechteck (klein) 

intin(3) 

Höhe Rechteck (klein) 

intin(4) 

x-Ordinate Rechteck (groß) 

intin(5) 

y-Ordinate Rechteck (groß) 

intin(6) 

Breite Rechteck (groß) 

intin(7) 

Höhe Rechteck (groß) 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C int gr_8finx; (intin 0) 
int gr_sfiny; (intin 1) 
int gr_sfinwidth; (intin 2) 
int gr_sfinheight; (intin 3) 
int gr_38tx; (intin 4) 
int gr_ssty; (intin 5) 
int gr_sstwidth; (intin 6) 
int gr_sstheight; (intin 7) 
int gr_sreturn; (intout) 

gr_8return=graf_shrinkbox(gr_sfinx, gr_sfiny, gr_sfinwidth, 
gr_sfinheight, gr_sstx, gr_ssty, gr_sstwidth, gr_sstheight); 
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GRAFWATCHBOX OP: 75 

Kontrolle, ob der Mauszeiger ein Rechteck (dieses muß Teil 
eines Objektbaums sein) betritt oder verlässt in dem Augenblick, 
wenn die linke Maustaste losgelassen wird. 


Eingabeparameter: 


control(0..4) 

intin(O) 

intin(l) 

intin(2) 


intin(3) 


75,4,1,1,0 

reserviert 
Objekt (Index) 

Objektstatus beim Betreten: 
0 = Normal 

1 = Selektiert 

2 = Gekreuzt 
4 = Geprüft 

8 = Nicht zugänglich 
16 = outlined 
32 = schattiert 
Objektstatus beim Verlassen: 
0 = Normal 

1 = Selektiert 

2 = Gekreuzt 
4 = Geprüft 

8 = Nicht zugänglich 
16 = outlined 
32 = schattiert 


addrin(O) 


Objektbaum-Adresse 


Ausgabeparameter: 

intout(O) Mauszeigerstatus (0=nicht im Rechteck l=im Rechteck) 

Zugriff: 

C int gr_wobject;(intin l) 
int gr_winstate;(intin 2) 
int gr_woustate;(intin 3) 
int gr_wptree;(addrin) 
int gr_wreturn;(intout) 

gr_wreturn=graf_watchbox(gr_wptree, gr__wobject, gr_winstate, 
gr_wout8tate); 
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GRAF SLIDEBOX OP: 76 

Verschieben eines Rechtecks in einem anderen horizontal oder 
vertikal entsprechend dem Mauspointer, wobei das umfassende 
Rechteck ein übergeordnetes Objekt des beweglichen Rechtecks 
sein muß. Die neue Position ist an der Stelle, an der die linke 
Maustaste losgelassen wird. 


Eingabeparameter: 
control(0..4) 76,3,1,1,0 


intin(O) 

intin(l) 

intin(2) 


Rechteck (Index) im übergeordneten Objekt(baum) 
Rechteck (Index) des beweglichen Objektes 
Bewegungsrichtung (0=waagerecht l=senkrecht) 


addrin(O) 


Objektbaum-Adresse 


Ausgabeparameter: 

intout(O) Mittelpunkt des beweglichen Objekts relativ zum umfassen¬ 

den Rechteck. 


Zugriff: 

C int gr_slparent;(intin 0) 
int gr_slobject;(intin 1) 
int gr_slvh;(intin 2) 
int gr_slptree;(addrin) 
int gr_slreturn;(intout) 

gr_slreturn=graf_slidebox(gr_slptree, gr_slparent, gr_slobject, gr_slvh); 


GRAF MOUSE OP: 78 

Änderung des Aussehens des Mauspointers. Es kann unter acht 
Standardformen und einer vom Benutzer definierbaren Form 
gewählt werden. 
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Eingabeparameter: 

control(0..4) 78,1,1,1,0 

intin(O) Mausform: 

0 = Pfeil (normal, Muß für Menüleisten etc.) 

1 = Cursor 

2 = Biene 

3 = Hand mit ausgestrecktem Zeigefinger 

4 = Hand, flach 

5 = Fadenkreuz (schmal) 

6 = Fadenkreuz (fett) 

7 = Fadenkreuz (Umriß) 

255 = freie Definition 

256 = Mausform aus 

257 = Mausform ein 


addrin(O) 


Adresse des Benutzereigenen Mausform-Definitionsblocks. 


Ausgabeparameter: 

intout(O) Fehlerkontrolle (0=Fehler >0=kein Fehler) 

Zugriff: 

C gr_monumber;(intin) 
gr_mofaddr;(addrin) 
gr_moreturn;(intout) 

gr_moreturn=graf_mou8e(gr__monumber, gr_mofaddr); 


GRAF MKSTATE OP: 79 

Ermitteln der Mausposition, des Status der Maustasten und der 
Sondertasten Shift, Control und Alternate. 


Eingabeparameter: 

control(0..4) 79,0,5,0,0 
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Ausgabeparameter: 


intout(O) 

intout(l) 

intout(2) 

intout(3) 

intout(4) 


reserviert (=1) 
x-Ordinate Mauszeiger 
y-Ordinate Mauszeiger 

Maustastenstatus (0=keine l=links 2=rechts 3=beide) 
Nicht-ASCII-Tastenstatus 


Bit 


0 Shift (rechts) 

1 Shift (links) 

2 Control 

3 Alternate 


Zugriff: 

C int gr_mkresvd; (intin 0) 
int gr_mkmx; (intin 1) 
int gr_mkmy; (intin 2) 
int gr_mkmstate; (intin 3) 
int gr_mkkstate; (intin 4) 

gr_mkresvd=graf_mkstate(&gr_mkmx l &gr_mkmy, &gr_mkmstate, 
&gr_mkkstate); 


Scrap-Funktionen 


SCRP READ OP: 80 

Wiederholen eines mit SCRP_WRITE in einen globalen Puffer 
des AES geschriebenen String. 

Eingabeparameter: 

control(0..4) 80,0,1,1,0 

addrin(0) Adresse, in die der globale String kopiert werden soll 

Ausgabeparameter: 

intout(0) Status: 0=Fehler, >0=OK 
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Zugriff: 

C int sc_rreturn; 

sc_rreturn=scrp_read (sc_rpscrap); 


SCRP WRITE OP: 81 

Schreiben eines Strings in den globalen Puffer des AES. Der 
String kann von einem anderen Programm mittels SCRP_READ 
wiedergeholt werden. 

Eingabeparameter: 

control(0..4) 81,0,1,1,0 

addrin(O) Adresse, aus dem der String zu holen ist 

Ausgabeparameter: 

intout(O) Status: 0=Fehler, >0=OK 

Shell-Funktionen 

SHELFIND OP: 124 

Durchsuchen einer Diskette nach einem angegebenen Filenamen. 
Wird er nicht auf der vorgegebenen Diskette gefunden, so wird 
noch auf Laufwerk A gesucht. 

Eingabeparameter: 

control(0..4) 124,0,1,1,0 

addrin(O) des Filenamens, der gesucht werden soll. An diese Stelle wird 

bei gefundenen File der Pfadname kopiert. 


Ausgabeparameter: 

intout(0) Status: 0=Fehler, >0=OK 
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SHELGET OP: 122 

Lesen einer Anzahl Bytes aus dem Environment-Speicher des 
GEM (z.B. Desktop.Inf-Einträge). 

Eingabeparameter: 

control(0..4) 122,1,1,1,0 

intin(O) Anzahl der zu lesenden Zeichen 

addrin(O) Adresse des Puffers, in den geschrieben werden soll 

Ausgabeparameter: 

intout(O) Status: 0=Fehler, >0=OK 


SHELPUT OP: 123 

Dies ist das Gegenstück zu SHEL_GET. Es wird eine Anzahl 

Bytes in den Environment-Speicher geschrieben. 

Eingabeparameter: 

control(0..4) 123,1,1,1,0 

intin(O) Anzahl der zu schreibenden Bytes 

addrin(O) Adresse des Puffers, aus dem die Bytes gelesen werden sollen 

Ausgabeparameter: 

intout(O) Status: 0=Fehler, >0=OK 


SHEL READ OP: 120 

Ermittlung des Namens und der auf rufenden Kommandozeile, 
mit der das Programm gestartet wurde. 

Eingabeparameter: 

control(0..4) 120,0,1,2,0 

addrin(0) Adresse des Puffers, in den die Kommando-Zeile geschrieben 

werden soll 

Adresse des Puffers, in den der Pfadname kommt 


addrin(l) 
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Ausgabeparameter: 

intout(O) Status: 0=Fehler, >0=OK 


SHELWRITE OP: 121 

Laden und starten von Programmen, ähnlich P_EXEC im 
GEMDOS. Scheint nicht so recht zu funktionieren.. 


Eingabeparameter: 

control(0..4) 121,3,1,2,0 


intin(O) 


intin(l) 


intin(2) 


Flag sh_wdoex: 

0 = GEM verlassen 
1 = Programm starten 
Flag sh_wisgr: 

0 = keine Grafik 
1 = mit Grafik 
Flag sh_wiscr: 

0 = kein GEM-Programm (TOS) 
1 = GEM-Programm 


addrin(O) Kommandozeile für Programmaufruf 

addrin(l) Pfadname des Programmes 


Ausgabeparameter: 

intout(O) Status: 0=Fehler, >0=OK 


5.7 Beispiel-Programm: Wecker-Accessory 

In den vorhergehenden Kapiteln haben Sie die Programmierung 
der verschiedenen Teile des Mega-ST-Betriebssystems 
kennengelernt. Sicher werden Sie anhand der jeweiligen 
Beispiele neugierig geworden sein und die ersten Programm- 
Projekte planen. Damit Sie sich dabei nicht alleine gelassen 
fühlen, möchte ich Ihnen nun ein etwas umfangreicheres 
Beispiel-Programm vorstellen. 

Dieses Programm verwendet sowohl XBIOS- als auch AES- 
Funktionen. Es stellt ein eigenes Accessory dar, welches eine 
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sehr interessante Erweiterung bietet. In der rechten, oberen Ecke 
des Desktops bzw. Ihres GEM-Programmes wird eine ständig 
mitlaufende Uhr dargestellt, die Ihnen anzeigt, was die Stunde 
geschlagen hat. Die Zeit wird dort in Stunden, Minuten und 
Sekunden angezeigt, wobei die Sekunden immer in 2er-Schritten 
hochzählen. Dies liegt in der internen Uhrzeit begründet, deren 
Format für die Sekunden nur 5 Bit zur Verfügung hat und 
dadurch nur 32 (also 30) Doppelsekunden darstellen kann. 

Wir haben also nun eine kleine Uhr auf dem "Schreibtisch". 
Doch wie sieht es mit Terminen aus, die man bei der Arbeit am 
Rechner immer wieder mal vergißt? Es ist natürlich durch die 
Anzeige der Uhrzeit nicht sichergestellt, daß Sie diese auch 
ständig beobachten! 

Dieses Problem wird durch eine weitere Funktion des 
Programmes beseitigt. Wenn Sie nämlich im Desk-Menü 
nachsehen, werden Sie dort den neuen Eintrag "Wecker" finden. 
Dies deutet schon darauf hin, daß in dieser Uhr ein beliebig 
einstellbarer und sekundengenauer Wecker steckt. 

Wählen Sei diesen Menüpunkt dann einmal an. In der rechten, 
oberen Ecke erscheint links neben der Uhrzeit (12:00). Dies ist 
die Vorgabe-Weckzeit. Wollen Sie also um 12 Uhr "geweckt" 
werden, so drücken Sie nun Return, und der Wecker ist "scharf. 

Viel wahrscheinlicher ist es aber, daß Sie eine völlig andere 
Uhrzeit im Wecker stellen wollen. Ist dies der Fall, so drücken 
Sie nicht Return, sondern die Cursor-Tasten. Ein Druck auf die 
Taste Cursor hoch setzt die Weckzeit um eine Stunde hoch, 
Cursor runter eine Stunde niedriger. Ebenso werden mit den 
Tasten Cursor rechts und Cursor links die Minuten eingestellt. 
Stimmt die in Klammern angezeigte Weckzeit schliePlich mit 
ihrer Vorstellung überein, so quittieren Sie dies mit der Return- 
Taste: der Wecker ist gestellt. 

Ist nun die Zeit X angebrochen, so ertönt der bekannte 
Glockenton. Es empfiehlt sich also, den Lautsprecher im 
Monitor nicht allzu leise zu drehen! Anschließend erscheint ein 
Alert-Fenster, welches Sie unübersehbar auf den Termin 
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hinweist. Wenn Sie dann schließlich darauf aufmerksam 
geworden sind, so müssen Sie den Alarm quittieren, indem Sie 
entweder den "bin wach !"-Knopf mit der Maus anklicken oder 
einfach Return drücken. Das Alert-Fenster ist dann ebenso wie 
die Weckzeitanzeige wieder verschwunden und der Wecker 
ausgestellt. 

Sollte Ihnen einfallen, daß der Termin entweder falsch oder 
nicht mehr aktuell ist, so können Sie den Wecker auch vor der 
Minute X wieder entschärfen. Dies geschieht durch erneutes 
Anwählen des "Wecker"-Menüpunktes: die Weckzeit 

verschwindet aus dem Bild. Wenn Sie dann wieder diesen 
Menüpunkt anwählen, so erscheint wieder die zuletzt eingestellte 
Weckzeit, die Sie dann ggf. korrigieren und mit Return 
bestätigen müssen. 

Sie sehen, dieses Programm ist äußerst nützlich! Endlich hört 
das ewige Verpassen von Terminen auf, und außerdem haben Sie 
immer die richtige Uhrzeit im Blick. Dies ist ja auch ein 
Verdienst der im Mega-ST eingebauten Uhr, die beim 
Einschalten direkt die richtige Zeit weiß. Mit diesem Programm 
sind Sie dann auch immer auf dem laufenden. 


****************************************** 
***** Uhr-Accessory mit Wecker ***** 
***** aus Mega-ST-Buch 2 ***** 

***** 5/83 s.A.Di ttrich ***** 

****************************************** 


Start: 


move.1 

#nstapel,a7 

;neuen Stack einrichten 

move 

#10,opcode 

;appl_init 

clr 

sintin 


move 

#1,sintout 


clr 

saddrin 


clr 

saddrout 


jsr 

aes 

;Anwendung anmelden 

move 

intout,appid 


move 

#35,opcode 

;Menu_Register 

move 

#1,sintin 


move 

#1 # sintout 
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move 

#1,saddrin 


move 

appid,int in 


move.1 

#accname,addrin 

;Accessory-Eintrag setzen 

jsr 

aes 


move 

intout,accid 


LINE_A 

0 

;Zeiger auf Fonts holen 
;oder dc.w SaOOO einsetzen! 

move.1 

4(a1),a3 

;Fontheaderadresse ermitteln 

move.1 

76(a3),fontpnt 

;8x8 Fontadresse in fontpnt 

move 

#2,-(sp) 


trap 

#14 

;Bildadresse in DO 

addq.1 

#2,sp 


add. 1 

#80,dO 


move.1 

d0,scrpnt 

;Bildadresse in scrpnt 


;** Accessory-Bereitschafts- 

Schleife ** 

loop: bsr 

showtime 

;Zeit anzeigen 

bsr 

event 

;Event_Multi 

move 

msgbuff,d0 


cmp 

#40,dO 

;Acc_open ? 

bne 

loop 


move 

msgbuff+8,d0 


cmp 

accid,d0 

;unsere Accessory-Nummer ? 

bne 

loop 


bsr 

wecker 

;Wecker bedienen (stellen/aus) 

clr 

msgbuff 


bra 

loop 

;Schleife... 


.*** Zeitausgabe 10/87 S. 

.A.D. *** 

showtime: 

move.1 

timesav,d6 

;alte Zeit retten 

bsr 

gettime 

;Uhrzeit einstellen 

cmp. 1 

timesav,d6 

;neue Zeit ? 

beq 

timend 

;nein, nicht ausgeben 

move 

#72,d2 

;BiIdoffset=72 

lea 

time,a0 

;Textadresse in A0 

bsr 

textout 

;Zeit anzeigen 
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tst weckfl 

beq timend 

move #4 # d6 

lea weck+1,a0 

lea time # a1 

wkloop: 

move.b (aO)+,dO 

cmp.b (a1)+,d0 

bne notnow 

dbra d6,wkloop 

****** Wecken !!!! ****** 

move #7,-(sp) 

move #2,-(sp) 

trap #1 

addq.l #4,sp 

move.l #altext,dO 

bsr form_alert 

bra wecker 

notnow: 

move #63,d2 

lea weck,aO 

bra textout 

timend: 

rts 


;Wecker an ? 
;nein: fertig 


;Zeit mit Weckzeit vergleichen 
/falsche Zeit! 


; 1 Pling 1 ausgeben 


/Weckmeldung als 
/Alert ausgeben 
/Weckzeit löschen 


;Bildoffset=63 
/Textadresse in AO 
/Zeit / Weckzeit anzeigen 


textout: 

move.l fontpnt,a3 /Fontadresse 

move.l scrpnt,a2 /Bildadresse 


Textausgabe: Text ab (AO), Bild (A2), Font (A3) *** 


tloop: 

move d2,d1 

clr dO 

move.b (aO)+,dO 

bne charout 

rts 


/Offset in Dl 
/Zeichen aus Text holen 


/Ende bei 0! 
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charout: 

move #7,d3 ;Zähler 

move #80,d6 ;Hilfszähler 

move #$100,d7 

chrlop: 

move.b (a3,d0.w),(a2,d1.w) reine Zeile ins Bild 


add d6,d1 
add d7,d0 
dbra d3,chrlop 

addq.l #1,d2 
bra tloop 

gettime: 

move #23,-(sp) 
trap #14 
addq.l #2,sp 
move.l dO,timesav 

lea time,aO 

move d0,d2 
and.I #%11111 f d2 
Isl #1,d2 

Isr #5,d0 
move d0,d1 
and.I #%111111,d1 

Isr #6,d0 
and.I #%11111,dO 

bsr todez 
move.b #':',(a0)+ 
move.l d1 # d0 

settime: 

bsr todez 
move.b # l :',(a0)+ 
move.l d2,d0 

todez: 

and.I #$ff,dO 
divu #10,d0 
add.I #$100010,dO 
move.b d0,(a0)+ 


;eine Zeile tiefer 
;nächste Zeile im Zeichensatz 
;und nächste Zeile 

;nächste Spalte 


;gettime, Zeit holen 
;und retten 


;Sekunden in D2 
;Sekunden*2 


;Minuten in Dl 


;Stunden in DO 

;in 'time' einsetzen 
;Doppelpunkt setzen 
;Minuten in DO 

;in 'time' einsetzen 
,-Doppelpunkt setzen 
;Sekunden in DO 


;Umwändeln in ASCII 
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swap dO 
move.b dO,(aO)+ 
rts 
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wecker: 


not 

weckfl 

;Weckerflag drehen 

bne 

setweck 

;Weckzeit stellen 

move 

#63,d2 

;Bildoffset=63 

lea 

blank,aO 

;Textadresse in AO 

bra 

textout 

;Text ausgeben 

weckx: 

move 

d6,wtime 


move 

d7,wtime+2 

;alte Weckzeit retten 

rts 

setweck: 

move 

wtime,d6 

;Stunde in D6 

move 

wtime+2,d7 

;Minute in d7 

wecklop: 

lea 

weck+1,a0 


move.1 

d6,d0 


move.1 

d7,d2 


bsr 

settime 

;12:00 Weckzeit 

movem.1 

d6-d7,-(sp) 


move 

#63,d2 

;Bildoffset=63 

lea 

weck,aO 

;Textadresse in AO 

bsr 

textout 

;Text ausgeben 

move 

#8,-(sp) 


trap 

#1 

;Conin without Echo 

addq.1 

#2,sp 


movem.1 

(sp)+,d6*d7 


cmp.b 

#13,dO 

;Return ? 

beq 

weckx 

;ja: fertig 

swap 

dO 


cmp 

#$48,dO 

;Cursor hoch ? 

bne 

nocursup 


addq 

#1 ,d6 

;Stunde*1 

cmp 

#24,d6 
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blo wecklop 

clr d6 

bra wecklop 

nocursup: 

cmp #$50,dO 

bne nocursdn 

subq #1,d6 

bpi wecklop 

move #23,d6 

bra wecklop 

nocursdn: 

cmp #$4d,d0 

bne nocursrt 

addq #1,d7 

cmp #59,d7 

blo wecklop 

clr d7 

bra wecklop 

nocursrt: 

cmp #$4b,d0 

bne wecklop 

subq #1,d7 

bpi wecklop 

move #59,d7 

bra wecklop 

form_alert: 

move #52,opcode 
move #1,sintin 
move #1,sintout 
move #1,saddrin 
move #1,intin 
move.l d0,addrin 
bra aes 


;Cursor runter ? 

;Stunde*1 

/Cursor rechts ? 

;Minute+1 

/Cursor links ? 

/Minute-1 

/Form_Alert (DO) ausgeben 


event: 

move #25,opcode /Event_Multi 

move #16,sintin 

move #7,sintout 

move #1,saddrin 

move.l #msgbuff,addrin 

lea table,a1 

lea intin,a2 

moveq #15,d0 

lopl: 

move (a1)+,(a2)+ 

dbra d0,lop1 
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aes: ;AES aufrufen 


move.1 

#aespb,d1 

move 

#$c8,d0 

trap 

#2 

rts 



;*** Datenbereich *** 

table: 

dc.w 

$33,1,1,1,0,0,0,0,0,0,0,0,0,0,100,0 

accname: 

dc.b 

" Wecker ",0 

altext: 

dc.b 

"[1][ Es ist Weckzeit, Sir ! |] [ bin wach 

blank: 

dc.b 

' '.0 

.weck: 

dc.b 

'(12:00) ' 

time: 

even 

dc.b 

11 ,0 

weckfl: 

dc.w 

0 ;Weckerflag (an/aus) 

fontpnt: 

blk.l 

1 ;Zeiger auf Zeichensatz 

scrpnt: 

blk.l 

1 ;Zeiger auf Bildschirm 

timesav: 

blk.l 

1 /aktuelle Zeit 

wtime: 

dc.w 

12,0 /Weckzeit 

aespb: 

de.1 contrl,global,int in,intout,addrin,addrout 

contrl: 

opcode: 

blk.w 

1 

sintin: 

blk.w 

1 

sintout: 

blk.w 

1 

saddrin: 

blk.w 

1 

saddrout: 

blk.w 5 

blk.l 

1 


global: 

blk.l 8 



int in: 

blk.w 80 



ptsin: 

blk.w 80 



intout: 

blk.w 80 



ptsout: 

blk.w 80 



addrin: 

blk.w 80 



addrout: 

blk.w 80 



appid: 

blk.w 

1 

;Application- ID 

accid: 

blk.w 

1 

;Accessory-Unit 

msgbuff: 

blk.b 

16 

;AES-Message-Puffer 


blk.l 

140 

/neuer Stack 

nstapel: 

blk.l 

1 
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6. Das BIOS-Listing 


Nachfolgend finden Sie das kommentierte BIOS-Listing des 
Atari Mega ST. Es handelt sich dabei um die deutsche ROM- 
Version vom 22.4.1987. Das Listing umfaßt die Systeminitiali¬ 
sierung, das komplette BIOS und XBIOS sowie den VT52-Bild- 
schirm-Treiber mit den zugehörigen Blitter-Routinen. 

Die wichtigsten Unterschiede zu früheren TOS-Yersionen sollen 
hier kurz angeschnitten werden. Da im neuen TOS die Routinen 
zur Ansteuerung des Blitters hinzugekommen sind, mußte dafür 
Platz im ROM geschaffen werden. Dies geschah hauptsächlich 
durch Optimieren der LINE A und VDI-Routinen sowie durch 
Einsparungen im AES und Desktop. Die fehlerhaften RS 232 
Routinen des alten TOS wurden fast komplett neu geschreiben, 
so daß jetzt XON/XOFF- und RTS/CTS-Handshake richtig 
funktionieren. Weiterhin wurden einige Optimierungen in den 
Routinen zum Löschen des Speichers vorgenommen, das mit dem 
alten TOS beim Ausbau auf 4 MByte sonst sehr lange dauerte. 
Desweiteren finden finden Sie im ROM-Listing die Routinen 
zur Ansteuerung der Hardware-Uhr. Das neue TOS läuft übri¬ 
gens auch in Geräten, die keinen Blitter und/oder keine Hard¬ 
ware-Uhr enthalten, da softwaremäßig auf deren Vorhandensein 
getestet wird. Entsprechend wird die richtige Routine ausge¬ 
sucht. Bei den Floppy-Routinen wurden einige kleine Verbes¬ 
serungen und Erweiterungen vorgenommen. 

Der TOS-Header am Anfang des ROM wurde dahingehend er¬ 
weitert, daß Sie dort die Adresse der GEMDOS-Speicherliste, 
des Shift-Status sowie den Zeiger auf die aktuelle Basepage 
finden. 

Weiterhin sind die BIOS-Funktionen für Ein- und Ausgabe so¬ 
wie die zugehörigen Status-Routinen jetzt über neue Vektoren 
geführt (Bconstat, Bconin, Bcostat und Bconout). Dabei ist für 
jede Funktion jetzt eine Liste für 8 Devices vorhanden. Damit 
ist es jetzt einfacher, neue Gerätetreiber einzubinden, wie z.B. 
Drucker-Spooler. 
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Wollen Sie Systemroutinen des TOS in eigenen Routinen be¬ 
nutzen, so sollten Sie nur die Aufrufe über die entsprechenden 
TRAPs benutzen. Andernfalls laufen Sie Gefahr, daß Ihr Pro¬ 
gramm mit einer geänderten Version des TOS nicht mehr läuft. 
Das gleiche gilt für die Benutzung von Variablen, die nicht in 
der Liste der Systemvariablen enthalten sind. 

Ansonsten können Ihnen die Routinen des BIOS als hervor¬ 
ragendes Anschauungsmaterial für Ihre eigenen Routinen in 
68000-Assembler dienen. Falls Ihnen einige Routinen etwas um¬ 
ständlich und undurchsichtig erscheinen, so handelt es sich 
meistens um Produkte, die der C-Compiler geliefert hat. Sie 
können Sie daran erkennen, daß solche Routinen immer mit 
"link#n,A6" beginnen. Über A6 als Basisregister können dann 
mit positivem Offset die an die Routine übergebenen Parameter, 
mit negativem Offset die lokalen Variablen dieser Routine an¬ 
gesprochen werden. 
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************************************************************** Atari Hega ST ROM Listing 


FC0000 

602E 

bra 

SFC0030 

Sprung zum Programmstart 

FC0002 

0102 

dc.b 

1,2 

Version 1.2 

FC0004 

00FC0030 

dc.l 

SFC0030 

Reset-Adresse 

FC0008 

OOFCOOOO 

de. 1 

SFC0000 

Beginn des Betriebssystems 

FC000C 

00008900 

dc.l 

$8900 

Beginn des freien RAMs 

FC0010 

O0FCO030 

dc.l 

SFC0030 

Default Shell (Reset) 

FC0014 

00FEFFF4 

dc.l 

$FEFFF4 

Adresse für GEM magic 

FC0018 

04221987 

dc.l 

$04221987 

Erstellungsdatum 22. 4. 1987 

FC001C 

0003 

dc.u 

3 

Flag für PAL-Version 

FC001E 

0E96 

dc.w 

$0E96 

Datum im GEMDOS-Format 

FC0020 

00007E9C 

dc.l 

$7E9C 

Zeiger auf GEMDOS Speicherliste 

FC0024 

00000E61 

dc.l 

$E61 

Zeiger auf Shift-Status 

FC0028 

000087CE 

dc.l 

$87CE 

Zeiger auf aktuelle GEMDOS Basepage 

FC002C 

00000000 

dc.l 

0 

reserviert 

FC0030 

46FC2700 

move.w 

#$2700,SR 

Supervisor-Modus, IPL 7 

FC0034 

FC0036 

4E70 

0CB9FA52235F00FA0000 

reset 

cmp. 1 

#$FA52235F,$FAOOOO 

Peripheriebausteine rücksetzen 
Diagnostic-Cartridge eingesetzt? 

FC0040 

660A 

bne 

$FC004C 

nein 

FC0042 

4DFA0008 

lea 

$FC004C(PC),A6 

Rücksprungadresse laden 

FC0046 

4EF900FA0004 

jmp 

$FA0004 

Sprung in Cartridge 

FC004C 

4DFA0006 

lea 

$FC0054(PC),A6 

Rücksprungadresse laden 

FC0050 

60000636 

bra 

$FC0688 

Speicherkonfiguration gültig? 

FC0054 

660A 

bne 

$FC0060 

nein 

FC0056 

13F900000424FFFF8001 

move.b 

$424,$FFFF8001 

sonst memctrl übernehmen 

FC0060 

9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC0062 

0CAD314159260426 

cmp. 1 

#$31415926,$426(A5) 

resvalid, resvector gültig? 

FC006A 

6618 

bne 

$FC0084 

nein 

FC006C 

202D042A 

move.1 

$42A(A5),D0 

resvector laden 

FC0070 

4A2D042A 

tst.b 

$42A(A5) 

Bit 24-31 gesetzt? 

FC0074 

660E 

bne 

$FC0084 

ja, Vektor ungültig 

FC0076 

08000000 

btst 

#0,00 

Adresse ungerade? 

FC007A 

6608 

bne 

$FC0084 

ja, ungültig 

FC007C 

2040 

move.1 

00,A0 

Adresse laden 

FC007E 

4DFAFFE0 

lea 

$FC0060(PC),A6 

Rücksprungadresse laden 

FC0082 

4ED0 

jmp 

(A0) 

über Vektor springen 

FC0084 

41F9FFFF8800 

lea 

$FFFF8800,A0 

Adresse des PSG 

FC008A 

10BC0007 

move.b 

#7,(A0) 

Port A und B 

FC008E 

117C00C00002 

move.b 

#$C0,2(A0) 

auf Ausgabe 

FC0094 

10BC000E 

move.b 

#$E,(AO) 

Port A selektieren 

FC0098 

117C00070002 

move.b 

#7,2(A0) 

Floppi es deselektieren 

FC009E 

083A0000FF7B 

btst 

#0,$FC001B(PC) 

Pal-Version? (muß $FC001D sein !) 

FC00A4 

6710 

beq 

$FC00B6 

nein 

FC00A6 

4DFA0006 

lea 

$FC00AE(PC),A6 

Rücksprungadresse laden 

FCOOAA 

FCOOAE 

60000D6E 

13FC0002FFFF820A 

bra 

move.b 

$FC0E1A 

#2,$FFFF820A 

Sync-Mode auf PAL, 50 Hz 

FC00B6 

43F9FFFF8240 

lea 

$FFFF8240,Al 

Adresse der Farbpalette 

FCOOBC 

303C000F 

move.w 

#$F,00 

16 Farben 

FCOOCO 

41FA05E6 

lea 

$FC06A8(PC),A0 

Adresse der Farbtabelle 

FC00C4 

3208 

move.w 

(A0)+,(Al)+ 

Farbe in Palettenregister kopieren 

FC00C6 

51C8FFFC 

dbra 

D0,$FC00C4 

nächste Farbe 

FCOOCA 

13FC0001FFFF8201 

move.b 

#1,$FFFF8201 

dbaseh 

FC00D2 

13FC0000FFFF8203 

move.b 

#0,$FFFF8203 

dbasel, Videoadresse auf $10000 

FCOODA 

9BCD 

sub. 1 

A5,A5 

A5 löschen 

FCOODC 

1C2D0424 

move.b 

$424(A5),D6 

memctrl 

FCOOEO 

2A2D042E 

move.1 

$42E(A5),D5 

phystop, Speicherobergrenze 

FC00E4 

4DFA0006 

lea 

$FC00EC(PC),A6 

Rücksprungadresse laden 

FCOOE8 

6000059E 

bra 

$FC0688 

Speicherkonfiguration gültig? 

FCOOEC 

67000118 

beq 

$FC0206 

ja 

FCOOFO 

4246 

clr.w 

D6 

Startwert für Memory-Controller 

FC00F2 

13FC000AFFFF8001 

move.b 

#$A,$FFFF8001 

Memory-Controller auf 2 * 2 MB 

FCOOFA 

307C0008 

move.w 

#8,A0 

Startadresse für Speichertest 

FCOOFE 

43F900200008 

lea 

$200008,AI 

AI zeigt auf zweite Bank 

FC0104 

4240 

clr.w 

DO 

zu schreibendes Bitmuster löschen 

FC0106 

30C0 

move.w 

DO,(A0)+ 

Muster schreiben 

FC0108 

32C0 

move.w 

DO,(AI)+ 

an anderen Adreßbereich schreiben 
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FC010A D07CFA54 

add.w 

#$FA54,D0 

nächstes Bitmuster 

FC010E B1FC00000200 

cmp. 1 

#$200,A0 

Endadresse schon erreicht? 

FC0114 66F0 

bne 

SFC0106 

nein 

FC0116 223C00200000 

move.1 

#$200000,01 

01 gleich zweite Bank 

FC011C E44E 

Isr.w 

#2,06 


FC011E 307C0208 

move.w 

#$208,A0 

steht Bitmuster bei $208? 

FC0122 4BFA0006 

lea 

$FC012A(PC),A5 

Rücksprungadresse laden 

FC0126 6000054A 

bra 

$FC0672 

Speichertest 

FC012A 6720 

beq 

$FC014C 

ok, 128 K 

FC012C 307C0408 

move.w 

#$408,A0 

bei $408? 

FC0130 4BFA0006 

lea 

$FC0138(PC),A5 

Rücksprungadresse laden 

FC0134 6000053C 

bra 

$FC0672 

Speichertest 

FC0138 6710 

beq 

$FC014A 

ok, 512 K 

FC013A 307C0008 

move.w 

#8,A0 

bei $8? 

FC013E 4BFA0006 

lea 

$FC0146(PC),A5 

Rücksprungadresse laden 

FC0142 6000052E 

bra 

$FC0672 

Speichertest 

FCO146 6604 

bne 

$FC014C 

nichts in dieser Bank 

FC0148 5846 

addq.w 

#4,06 


FC014A 5846 

addq.w 

#4,D6 

Konfigurationsbyte auf 2 HB 

FC014C 92BC00200000 

sub. 1 

#$200000,01 

nächste Bank 

FC0152 67C8 

beq 

SFC01IC 

Test für erste Bank? 

FC0154 13C6FFFF8001 

move.b 

D6,$FFFF8001 

Hemorycontroller programmieren 

FC015A 4FF900008000 

lea 

$8000,A7 

Stackpointer auf $8000 

FC0160 287900000008 

move.1 

$8,A4 

Buserror-Vektor merken 

FC0166 41FA0036 

lea 

$FC019E(PC),A0 

Adresse neue Buserror-Routin 

FC016A 23C800000008 

move.1 

A0,$8 

setzen 

FC0170 363CFB55 

move.w 

#$FB55,D3 

Start Bitmuster 

FC0174 2E3C00020000 

move.1 

#$20000,07 

Startadresse ist 128 K 

FC017A 2047 

move.1 

D7,A0 

aktuelle Adresse 

FC017C 2248 

move.1 

A0, Al 

merken 

FC017E 3400 

move.w 

00,D2 


FC0180 722A 

moveq.l 

#42,01 

43 Worte 

FC0182 3302 

move.w 

02,-(AI) 

Bitmuster ins RAH schreiben 

FC0184 0443 

add.w 

03,02 

Huster ändern 

FC0186 51C9FFFA 

dbra 

Dl,$FC0182 

nächstes Bitmuster schreiben 

FC018A 2248 

move.1 

A0,A1 

Adresse zurückholen 

FC018C 722A 

moveq.1 

#42,01 

43 Worte 

FC018E B061 

cmp.w 

-(AI),DO 

steht Bitmuster im RAH? 

FC0190 660C 

bne 

$FC019E 

nein, Test abbrechen 

FC0192 4251 

clr.w 

(AI) 

RAH löschen 

FC0194 D043 

add.w 

03,00 

Bitmuster ändern 

FC0196 51C9FFF6 

dbra 

Dl,$FC018E 

nächstes Wort testen 

FC019A D1C7 

add.l 

D7,A0 

Adresse um 128 K erhöhen 

FC019C 60DE 

bra 

$FC017C 

weiter testen 

FC019E 91C7 

sub. 1 

D7,A0 

Adresse • 128 K 

FCOIAO 2A08 

move.l 

A0,D5 

und merken 

FC01A2 23CC00000008 

move.1 

A4,$8 

alte Buserror-Rout ine wiederherstellen 

FC01A8 2005 

move.1 

05,DO 

höchste Adresse fürs Löschen 

FC01AA 90BC00008000 

sub. 1 

#$8000,00 

minus 32 K für Bildschirm 

FC01B0 E048 

Isr.w 

#8,00 

acht nach rechts schieben 

FC01B2 13C0FFFF8203 

move.b 

D0,$FFFF8203 

dbasel 

FC01B8 4840 

swap 

DO 


FC01BA 13C0FFFF8201 

move.b 

D0,$FFFF8201 

dbaseh 

FC01C0 2045 

move.1 

D5,A0 


FC01C2 283C00000400 

move.1 

#$400,04 

Speicher löschen bis $400 

FC01C8 7000 

moveq.1 

#0,00 


FC01CA 7200 

moveq.1 

#0,D1 

Register löschen 

FC01CC 7400 

moveq.1 

#0,D2 

für schnelle Lösch-Routine 

FC01CE 7600 

moveq.1 

#0,D3 


FC01D0 48E0F000 

movem.1 

D0-D3,*(A0) 


FC01D4 48E0F000 

movem. 1 

D0-D3,-(A0) 

4 * 16 = 64 Bytes löschen 

FC01D8 48E0F000 

movem. 1 

D0-D3,*(A0) 


FC01DC 48E0F000 

movem.1 

00-03,*(A0) 


FC01E0 B1C4 

cmp. 1 

04, A0 

Endadresse schon erreicht? 

FC01E2 66EC 

bne 

$FC01D0 

nein 

FC01E4 9BCD 

sub.l 

A5,A5 

A5 löschen 

FC01E6 1B460424 

move.b 

D6,$424(A5) 

memctrl setzen 



Das BIOS-Listing 


385 


FC01EA 2B45042E 

move.1 

D5,$42E(A5) 

höchste RAM-Adresse als phystop 

FC01EE 2B7C752019F30420 

move.1 

#$752019F3,$420(A5) 

magic nach memvalid 

FC01F6 2B7C237698AA043A 

move.1 

#$237698AA,$43A(A5) 

magic nach memval2 

FC01FE 2B7C5555AAAA051A 

move.1 

#$5555AAAA,$51A(A5) 

magic nach memval3 

FC0206 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC0208 207C00000980 

move.1 

#$980,A0 

Ende der Systemvariablen 

FC020E 227C00010000 

move.1 

#$10000,AI 

bis aktuelle Videoadresse 

FC0214 7000 

moveq.1 

#O,D0 

Register löschen 

FC0216 30C0 

move.w 

DO,(A0)+ 

Speicher löschen 

FC0218 B3C8 

cmp. 1 

A0, AI 

Endadresse schon erreicht? 

FC021A 66FA 

bne 

$FC0216 

nein, weitermachen 

FC021C 2060042E 

move.1 

$42E(A5),A0 

phystop 

FC0220 91FC00008000 

sub. 1 

#$8000,A0 

minus 32 K 

FC0226 2B48044E 

move.1 

A0,$44E(A5) 

gleich _v_bs_ad 

FC022A 13ED044FFFFF8201 

move.b 

$44F(A5),$FFFF8201 

dbasel 

FC0232 13ED0450FFFF8203 

move.b 

$450(A5),$FFFF8203 

und dbaseh setzen 

FC023A 323C07FF 

move.w 

#$7FF,D1 

32 K 

FC023E 20C0 

move.1 

DO,(A0)+ 


FC0240 20C0 

move.1 

DO,(A0)+ 


FC0242 20C0 

move.1 

D0,(A0)+ 

Bildschirm löschen 

FC0244 20C0 

move.1 

DO,(A0)+ 


FC0246 51C9FFF6 

dbra 

D1,$FC023E 

nächste 16 Bytes 

FC024A 207AFDC8 

move.1 

$FC0014(PC),A0 

Adresse osjnagic 

FC024E 0C9087654321 

cmp. 1 

#$87654321,(A0) 

magic vorhanden? 

FC0254 6704 

beq 

$FC025A 

ja 

FC0256 41FAFDBO 

lea 

$FC0008(PC),A0 

sonst Systemadressen verwenden 

FC025A 23E80004000004FA 

move.1 

4(A0),$4FA 

end_os 

FC0262 23E80008000004FE 

move.1 

8(A0),$4FE 

execos 

FC026A 2B7C00FC0F44046A 

move.1 

#$FC0F44,$46A(A5) 

hdv_init 

FC0272 2B7C00FC12B60476 

move.1 

#$FC12B6,$476(A5) 

hdv_rw 

FC027A 2B7C00FC0FCA0472 

move.1 

#$FC0FCA,$472(A5) 

hdv_bpb 

FC0282 287C00FC117A047E 

move.1 

#$FC117A,$47E(A5) 

hdv_mediach 

FC028A 2B7C00FC1560047A 

move.1 

#$FC1560,$47A(A5) 

hdv_boot 

FC0292 2B7C00FC21240506 

move.1 

#$FC2124,$506(A5) 

prtstat 

FC029A 2B7C00FC2090050A 

move.1 

#$FC2090,$50A(A5) 

prt_vec 

FC02A2 2B7C00FC219A050E 

move.1 

#$FC219A,$50E(A5) 

auxstat 

FC02AA 2B7C00FC21B40512 

move.1 

#$FC21B4,$512(A5) 

aux_vec 

FC02B2 2B7C00FC0D620502 

move.1 

#$FC0D62,$502(A5) 

dump_vec 

FC02BA 2B60044E0436 

move.1 

$44E(A5),$436(A5) 

_v_bs_ad nach memtop 

FC02C0 2B6004FA0432 

move.1 

$4FA(A5),$432(A5) 

end_os nach _membot 

FC02C6 4FF90000755A 

lea 

$755A,A7 

System-Stackpointer initialisieren 

FC02CC 3B7C00080454 

move.w 

#8,$454(A5) 

nvbls, Länge VBL-Queue 

FC02D2 50ED0444 

st 

$444(A5) 

_fverify, Floppy Verify-Flag setzen 

FC02D6 3B7C00030440 

move.w 

#3,$440(A5) 

seekrate auf 3 ms 

FC02DC 2B7C000016DA04C6 

move.1 

#$16DA,$4C6(A5) 

_dskbufp 

FC02E4 3B7CFFFF04EE 

move.w 

#-1,$4EE(A5) 

dunpflg löschen 

FC02EA 2B7C00FC000004F2 

move.1 

#$FC0000,$4F2(A5) 

sysbase auf ROM-Start 

FC02F2 2B7C0000093A04A2 

move.1 

#$93A,$4A2(A5) 

savptr für BI OS-Calls 

FC02FA 2B7C00FC0670046E 

move.1 

#$FC0670,$46E(A5) 

swv_vec für Monitorwechsel auf rts 

FC0302 42B9000004C2 

clr.l 

$4C2 

alle Laufwerke abmelden 

FC0308 61000BBO 

bsr 

$FC0EBA 

ROM-Header im RAM anlegen 

FC030C 47FA04C0 

lea 

$FC07CE(PC),A3 

Adresse rte 

FC0310 49FA035E 

lea 

$FC0670(PC),A4 

Adresse rts 

FC0314 0CB9FA52235F00FA0000 

cmp. 1 

#$FA52235F,$FA0000 

Diagnostic-Cartridge eingesetzt? 

FC031E 6726 

beq 

$FC0346 

ja, Exceptions nicht verändern 

FC0320 43FA082E 

lea 

$FC0B50(PC),A1 

Adresse für Exceptions anzeigcn 'Bomben' 

FC0324 D3FC02000000 

add. 1 

#$2000000,AI 

Vektornummer in Bit 24-31 auf 2 

FC032A 41F900000008 

lea 

$8, A0 

Start mit Bus-Error 

FC0330 303C003D 

move.w 

#$3D,D0 

62 Vektoren 

FC0334 20C9 

move.1 

Al,(A0)+ 

Vektor setzen 

FC0336 D3FC01000000 

add. 1 

#$1000000,AI 

Vektornummer erhöhen 

FC033C 51C8FFF6 

dbra 

DO,$FC0334 

nächsten Vektor initialisieren 

FC0340 23CB00000014 

move.1 

A3,$14 

'Division durch Null' auf rte 

FC0346 7006 

moveq.1 

#6,00 

7 Auto-Vektoren 

FC0348 43ED0064 

lea 

100(A5),A1 

Adresse Auto-Vektor 0 

FC034C 22FC00FC07CE 

move.1 

#$FC07CE,(A1)+ 

Vektor auf rte 

FC0352 51C8FFF8 

dbra 

D0,$FC034C 

nächster Auto-Vektor 

FC0356 2B7C00FC06DE0070 

move.1 

#$FC060E,112(A5) 

VBL-Interrupt, IPL 4 
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FC035E 2B7C00FC06C80068 

move.1 

#$FC06C8,104(A5) 

HBL-Interrupt, IPL 2 

FC0366 2B4B0088 

move.1 

A3,136(A5) 

TRAP #2 auf rte 

FC036A 2B7C00FC07F800B4 

move.1 

#$FC07F8,180(A5) 

TRAP #13 Vektor auf BIOS 

FC0372 2B7C00FC07F200B8 

move.1 

#$FC07F2,184(A5) 

TRAP #14 Vektor auf XBIOS 

FC037A 2B7C00FC9F660028 

move.1 

#$FC9F66,40(A5) 

Line A Vektor 

FC0382 2B4C0400 

move.1 

A4,$400(A5) 

etv_timer auf rts 

FC0386 2B7C00FC07EE0404 

move.1 

#$FC07EE,$404(A5) 

etvcritic Vektor 

FC038E 2B4C0408 

move.1 

A4,$408(A5) 

etv_term auf rts 

FC0392 41ED04CE 

lea 

$4CE(A5),A0 

_vbl_list • 

FC0396 2B480456 

move.1 

A0,$456(A5) 

als Zeiger auf _vblqueue 

FC039A 303C0007 

move.w 

#7,00 

8 Einträge 

FC039E 4298 

clr.l 

(A0)+ 

Eintrag löschen 

FC03A0 51C8FFFC 

dbra 

D0,$FC039E 

nächster Eintrag 

FC03A4 41F900FC09AE 

lea 

$FC09AE,A0 

Tabelle der BIOS-Device-Vektoren 

FC03AA 327C051E 

move.w 

#$51E,A1 

Adresse der Systemvariablen 

FC03AE 701F 

moveq.1 

#31,DO 

32 Vektoren 

FC03B0 22D8 

move.1 

(A0)+,(AI)+ 

kopieren 

FC03B2 51C8FFFC 

dbra 

D0,$FC03B0 

nächster Vektor 

FC03B6 61002050 

bsr 

SFC2408 

MFP initialisieren 

FC03BA 2F3C00FC053A 

move.1 

#$FC053A,-(A7) 

Zeiger auf IKBD-Reset-Sequenz 

FC03C0 3F3C0001 

move.w 

#1,*(A7) 

Länge 2 Bytes 

FC03C4 4EB900FC2212 

jsr 

SFC2212 

String an IKBD senden 

FC03CA 5C8F 

addq.l 

#6,A7 

Stackpointer korrigieren 

FC03CC 203C00007FFF 

move.1 

#$7FFF,D0 

Zähler für Verzögerungsschleife 

FC03D2 61000182 

bsr 

$FC0556 

rtsFC03D6 

51C8FFFA 

dbra 

D0,$FC03D2 

weiter warten 

FC03DA 7002 

moveq.1 

#2,00 

Bit 2 

FC03DC 61000268 

bsr 

SFC0646 

cartscan, Cartridge Initialisierung 

FC03E0 1039FFFF8260 

move.b 

$FFFF8260,00 

Videoauflösung holen 

FC03E6 C03C0003 

and.b 

#3,DO 

Bit 0 und 1 isolieren 

FC03EA B03C0003 

cmp.b 

#3,00 

ungültiger Wert? 

FC03EE 6602 

bne 

$FC03F2 

nein 

FC03F0 7002 

moveq.1 

#2, DO 

durch 2 für High Resolution ersetzen 

FC03F2 13C00000044C 

move.b 

D0,$44C 

sshiftmod 

FC03F8 1039FFFFFA01 

move.b 

SFFFFFA01,D0 

HFP gpip 

FC03FE 6B18 

bmi 

SFC0418 

kein Monochronmonitor? 

FC0400 4DFA0006 

lea 

$FC0408(PC),A6 

Rücksprungadresse 

FC0404 60000A14 

bra 

SFC0E1A 


FC0408 13FC0002FFFF8260 

move.b 

#2,SFFFF8260 

High resolution 

FC0410 13FC00020000044C 

move.b 

#2,$44C 

sshiftmod 

FC0418 61000B00 

bsr 

SFC0F1A 

Test ob Blitter vorhanden 

FC041C 4EB900FCA9F8 

jsr 

JFCA9F8 

Blitter-Vektoren initialisieren 

FC0422 4EB900FCA96E 

jsr 

SFCA96E 

BiIdschirmausgabe initialisieren 

FC0428 OC3900010000044C 

cmp.b 

#1,$44C 

sshiftmod 

FC0430 660A 

bne 

JFC043C 

nicht Medium Resolution? 

FC0432 33F9FFFF825EFFFF8246 

move.w 

SFFFF825E.SFFFF8246 

Farbe 15 (schwarz) nach Farbe 3 kopieren 

FC043C 2B7C00FC0030046E 

move.1 

#$FC0030,$46E(A5) 

swvvec auf Reset 

FC0444 33FC000100000452 

move.w 

#1,$452 

vblsem 

FC044C 4240 

clr.w 

00 

Bit 0 

FC044E 610001F6 

bsr 

SFC0646 

cartscan, Cartridge initialisieren 

FC0452 46FC2300 

move.w 

#$2300,SR 

IPL 3 

FC0456 7001 

moveq.1 

#1 ,D0 

Bit 1 

FC0458 610001 EC 

bsr 

SFC0646 

cartscan, Cartridge initialisieren 

FC045C 6100469A 

bsr 

SFC4AF8 

GEMDOS initialisieren 

FC0460 33F900FC001E00008840 

move.w 

$FC001E,$8840 

Systemdatum für GEMDOS übernehmen 

FC046A 610047D6 

bsr 

SFC4C42 

Systemzeit von Hardware-Uhr übernehmen 

FC046E 610000CC 

bsr 

$FC053C 

von Floppy booten 

FC0472 610000E4 

bsr 

SFC0558 

von DMA-Bus booten 

FC0476 6100090E 

bsr 

SFC0E56 

reset-residente Programme ausführen 

FC047A 4A7900000482 

tst.w 

$482 

cmdload gesetzt? 

FC0480 671E 

beq 

$FC04A0 

nein 

FC0482 610007C6 

bsr 

$FC0C4A 

autoexec, Programme im AUTO-Ordner ausf. 

FC0486 23FC00FC0000000004F2 

move.1 

#$FC0000,$4F2 

sysbase wieder auf ROM-Header 

FC0490 487A00A5 

pea 

$FC0537(PC) 

NulIname 

FC0494 487A00A1 

pea 

$FC0537(PC) 

NulIname 

FC0498 487A008A 

pea 

$FC0524(PC) 

1 COMMAND.PRG' 

FC049C 4267 

clr.w 

• (A7) 

Programm laden und starten 

FC049E 6068 

bra 

$FC0508 

zum Programm laden 
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FC04A0 610007A8 

bsr 

SFC0C4A 

autoexec, Programme im AUTO-Ordner ausf. 

FC04A4 23FC00FC0000000004F2 

move.1 

#$FC0000,$4F2 

sysbase wieder auf ROM-Header 

FC04AE 41FA0068 

lea 

$FC0518(PC),A0 

•PATH=' 

FC04B2 227C00000840 

move.1 

«840, AI 

Adresse für Environment 

FC04B8 OC100023 

cmp.b 

#$23,(A0) 

'#', Platzhalter für Drive 

FC04BC 6602 

bne 

SFC04C0 

nein 

FC04BE 2449 

move. 1 

A1,A2 

Adresse merken 

FC04C0 12D8 

move.b 

(A0)+,(Al)+ 

Filenamen kopieren 

FC04C2 6AF4 

bpi 

SFC04B8 

nächstes Byte 

FC04C4 103900000446 

move.b 

$446,00 

_bootdev, muß 'move.w* sein !! 

FC04CA D03C0041 

add.b 

#$41,00 

plus 'A• 

FC04CE 1480 

move.b 

00,(A2) 

Drive-Nummer einfügen 

FC04D0 487900000840 

pea 

$840 

Environment 

FC04D6 487900FC0537 

pea 

$FC0537 

NutIname 

FC04DC 487A0059 

pea 

$FC0537(PC) 

NulIname 

FC04E0 3F3C0005 

move.w 

#5,•(A7) 

Basepage erzeugen 

FC04E4 3F3C004B 

move.w 

#$4B,-(A7) 

Pexec 

FC04E8 4E41 

trap 

#1 

GEMOOS-Aufruf 

FC04EA DEFC000E 

add.w 

#$E,A7 

Stackpointer korrigieren 

FC04EE 2040 

move.1 

00,A0 

Adresse der Basepage 

FC04F0 2179000004FE0008 

move.1 

$4FE,8(A0) 

exec_os, Startadresse Desktop in Basepg. 

FC04F8 487900000840 

pea 

$840 

Environment 

FC04FE 2F08 

move.1 

A0,-(A7) 

Adresse der Basepage 

FC0500 487A0035 

pea 

$FC0537(PC) 

NulIname 

FC0504 3F3C0004 

move.w 

#4,•(A7) 

Programm starten 

FC0508 3F3C004B 

move.w 

#$4B,•(A7) 

Pexec 

FC050C 4E41 

trap 

#1 

GEMDOS auf rufen 

FC050E OEFCOOOE 

add.w 

#$E,A7 

Stackpointer korrigieren 

FC0512 4EF900FC0030 

jmp 

$FC0030 

falls Rückkehr, dann Reset 

FC0518 504154483000 

dc.b 

'PATH=',0 


FC051E 233A5C0000FF 

dc.b 

'#:\',0,0,$FF 


FC0524 434F4D4D414E442E5052 

dc.b 

•COMMAND.PRG',0 


FC052E 4700 




FC0530 47454D2E505247 

dc.b 

'GEH.PRG',0,0,0 


FC0537 000000 




FC053A 8001 

dc.b 

$80,1 

Reset-Sequenz für IKBD 




von Floppy booten 

FC053C 7003 

moveq.1 

#3,00 

Bit 3 

FC053E 61000106 

bsr 

$FC0646 

cartscan, Cartridge initialisieren 

FC0542 20790000047A 

move.1 

$47A,A0 

hdv_boot 

FC0548 4E90 

jsr 

(A0) 

Bootsektor laden 

FC054A 4A40 

tst.w 

DO 

ausführbar? 

FC054C 6608 

bne 

$FC0556 

nein 

FC054E 41F9000016DA 

lea 

$16OA,A0 

Adresse des Diskpuffers 

FC0554 4E90 

jsr 

(A0) 

Bootsektor ausführen 

FC0556 4E75 

rts 



*************************************************************** 

dmaboot, Bootsektor von DMA-Bus laden 

FC0558 7E00 

moveq.1 

#0,07 

mit Device 0 beginnen 

FC055A 612A 

bsr 

$FC0586 

dnaread, Bootsektor laden 

FC055C 6620 

bne 

$FC057E 

Fehler, nächstes Device testen 

FC055E 2079000004C6 

move.1 

$4C6,A0 

dskbufp 

FC0564 323C00FF 

move.w 

#$FF,D1 

$100 Worte 

FC0568 7000 

moveq.1 

#0,D0 

Summe löschen 

FC056A 0058 

add.w 

(A0)+,D0 

Checksumme bi Iden 

FC056C 51C9FFFC 

dbra 

01,$FC056A 

nächstes Uort addieren 

FC0570 B07C1234 

cmp.w 

#$1234,00 

Sektor ausführbar? 

FC0574 6608 

bne 

$FC057E 

nein 

FC0576 2079000004C6 

move.1 

$4C6,A0 

dskbufp 

FC057C 4E90 

jsr 

(A0) 

Bootsektor ausführen 

FC057E DE3C0020 

add.b 

#$20,D7 

nächste Device-Nummer 

FC0582 6606 

bne 

$FC055A 

schon alle acht Devices? 

FC0584 4E75 

rts 


dmaread, Bootsektor vom DMA-Bus laden 




FC0586 4DF9FFFF8606 

lea 

$FFFF8606,A6 

DMA Control Register 

FC058C 4BF9FFFF8604 

lea 

$FFFF8604,A5 

DMA Daten-Register 

FC0592 50F90000043E 

st 

$43E 

flock setzen 

FC0598 2F39000004C6 

move.1 

$4C6,-(A7) 

_dskbufp 
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FC059E 13EF0003FFFF860D 

move.b 

3(A7),JFFFF860D 


FC05A6 13EF0002FFFF860B 

move.b 

2<A7),$FFFF860B 

DHA-Adresse setzen 

FC05AE 13EF0001FFFF8609 

move.b 

1(A7),$FFFF8609 


FC05B6 584F 

addq.w 

#4,A7 

Stackpointer korrigieren 

FC05B8 3CBC0098 

move.w 

«98, (A6) 

R/W toggeln 

FC05BC 3CBC0198 

move.w 

«198, (A6) 


FC05C0 3CBC0098 

move.w 

«98, (A6) 

auf READ lassen 

FC05C4 3ABC0001 

move.w 

#1,(A5) 

Sektorcount Register auf 1 

FC05C8 3CBC0088 

move.w 

«88, (A6) 

DMA-Bus selektieren 

FC05CC 1007 

move.b 

D7,D0 

Gerätenummer « 5 

FC05CE 803C0008 

or.b 

#8,00 

mit READ-Befehl verodern 

FC05D2 4840 

swap 

00 


FC05D4 303C008A 

move.w 

«8A,D0 


FC05D8 614C 

bsr 

SFC0626 

Byte auf DHA-Bus ausgeben 

FCOSDA 662A 

bne 

SFC0606 

timeout, Abbruch 

FC05DC 7C03 

moveq.1 

#3,06 

Zähler auf 4 

FC05DE 41FA0036 

lea 

$FC0616(PC),A0 

Zeiger auf Tabelle mit Befehlsworten 

FC05E2 2018 

move.1 

(A0)+,DO 

Befehl holen 

FC05E4 6140 

bsr 

SFC0626 

auf DHA-Bus ausgeben 

FC05E6 661E 

bne 

SFC0606 

timeout, Abbruch 

FC05E8 51CEFFF8 

dbra 

06,$FC05E2 

nächsten Befehl 

FC05EC 2ABC0000000A 

move.1 

«A, (A5) 

Byte 6 (letztes Byte) senden 

FC05F2 323C0190 

move.w 

«190,Dl 

Timeout auf 2 Sekunden 

FC05F6 6132 

bsr 

SFC062A 

Byte ausgeben 

FC05F8 660C 

bne 

SFC0606 

timeout, Abbruch 

FC05FA 3CBC008A 

move.w 

«8A, (A6) 

Status-Register selektieren 

FC05FE 3015 

move.w 

(A5),D0 

Status lesen 

FC0600 C07C00FF 

and.w 

«FF,DO 

Bit 0-7 isolieren 

FC0604 6702 

beq 

SFC0608 

ok 

FC0606 70FF 

moveq.1 

#-1,D0 

Fehler aufgetreten 

FC0608 3CBC0080 

move.w 

#S80,(A6) 

DMA-Chip wieder auf Floppy-Betrieb 

FC060C 4A00 

tst.b 

DO 

Flags setzen 

FC060E 51F90000043E 

sf 

S43E 

flock löschen 

FC0614 4E75 

rts 






** Befehlsworte für DMA-Chip 

FC0616 0000008A 

de. 1 

S0000008A 


FC061A 0000008A 

de. 1 

S0000008A 


FC061E 0000008A 

dc.l 

S0000008A 


FC0622 0001008A 

de. 1 

$0001008A 





** webyte, Byte auf DMA-Bus ausgeben 

FC0626 2A80 

move.1 

DO,(A5) 

Byte ausgeben 

FC0628 720A 

moveq.1 

#10,Dl 

max. 1/20 Sekunde warten 

FC062A D2B9000004BA 

add. 1 

$4BA,D1 

_hz_200 

FC0630 08390005FFFFFA01 

btst 

#5,SFFFFFA01 

MFP gpip, Befehl verarbeitet? 

FC0638 670A 

beq 

SFC0644 

ja 

FC063A B2B9000004BA 

cmp. 1 

S4BA,D1 

_hz_200, Zeit abgelaufen? 

FC0640 66EE 

bne 

SFC0630 

nein, weiter warten 

FC0642 72FF 

moveq.1 

#*1,D1 

Timeout, Fehler 

FC0644 4E75 

rts 






** cartscan, Cartridge initialisieren 

FC0646 41F900FA0000 

lea 

SFA0000,A0 

Adresse der Cartridge 

FC064C 0C98ABCDEF42 

cmp. 1 

«ABCDEF42, (A0)+ 

Anwender - Cart ridge? 

FC0652 661A 

bne 

SFC066E 

nein 

FC0654 01280004 

btst 

D0,4(A0) 

gewünschtes Bit gesetzt? 

FC0658 670E 

beq 

SFC0668 

nein 

FC065A 48E7FFFE 

movem.1 

D0-D7/A0-A6,*(A7) 

Register retten 

FC065E 20680004 

move.1 

4(A0),A0 

Adresse der Routine holen 

FC0662 4E90 

jsr 

<A0) 

und ausführen 

FC0664 4C0F7FFF 

movem.1 

(A7)+,D0-D7/A0-A6 

Register zurückholen 

FC0668 4A90 

tst.l 

<A0) 

weitere Anwendung? 

FC066A 2050 

move.1 

(A0),A0 

Adresse holen 

FC066C 66E6 

bne 

SFC0654 

und weiter testen 

FC066E 4E75 

rts 



FC0670 4E75 

rts 


rts für Dummy-Routinen 




'** Speichertest 

FC0672 D1C1 

add. 1 

Dl, A0 

Startadresse 

FC0674 4240 

clr.w 

DO 

Bitmuster löschen 
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FC0676 43E801F8 

lea 

$1F8(A0),A1 

Endadresse 

FC067A B058 

cmp.w 

(A0)+,D0 

Test auf Bitmuster 

FC067C 6608 

bne 

5FC0686 

nicht gefunden, Fehler 

FC067E D07CFA54 

add.w 

#$FA54,D0 

nächstes Bitmuster 

FC0682 B3C8 

cmp. 1 

A0,A1 

Endadresse schon ereicht? 

FC0684 66F4 

bne 

SFC067A 

nein 

FC0686 4ED5 

jmp 

<A5) 

zurück zum Aufruf 

Speicherkonfiguration gültig? 




FC0688 9BCD 

sub. 1 

A5.A5 

A5 löschen 

FC068A 0CAD752019F30420 

cmp. 1 

#$752019F3,$420(A5) 

magic in memvalid? 

FC0692 6612 

bne 

SFC06A6 

nein 

FC0694 0CAD237698AA043A 

cmp. 1 

#$237698AA,$43A(A5) 

magic in memval2? 

FC069C 6608 

bne 

SFC06A6 

nein 

FC069E 0CAD5555AAAA051A 

cmp. 1 

#$5555AAAA,$51A(A5) 

magic in memval3? 

FC06A6 4ED6 

jmp 

(A6) 

zurück zum Aufruf 

Standard-Farbpalette 




FC06A8 0777070000700770 

dc.w 

$777,$700,S070,$770 

weiß, rot, grün, gelb 

FC06B0 0007070700770555 

dc.w 

$007,$707,$077,$555 

blau, magenta, cyan, hellgrau 

FC06B8 0333073303730773 

dc.w 

$333,$733,$373,$773 

grau, hellrot, hellgrün, hellgelb 

FC06C0 0337073703770000 

dc.w 

$337,$737,$377,$000 

hellblau, hellmagenta, hellcyan, schwarz 

************************** 

r*********** 

************************** 

HBL-Interrupt 

FC06C8 3F00 

move.w 

00,*(A7) 

DO retten 

FC06CA 302F0002 

move.w 

2(A7),D0 

Status vom Stack holen 

FC06CE C07C0700 

and.w 

#$700,DO 

IPL-Maske isolieren 

FC0602 6606 

bne 

$FC06OA 

nicht IPL 0? 

FC06D4 006F03000002 

or.w 

#$300,2(A7) 

sonst IPL 3 setzen 

FC060A 301F 

move.w 

(A7)+,D0 

DO wieder zurück 

FC06DC 4E73 

rte 



*************************************************************** 

VBL-Interrupt 

FC06DE 52B900000466 

addq.l 

#1 ,$466 

_frclock erhöhen 

FC06E4 537900000452 

subq.w 

#1,$452 

vblsem 

FC06EA 6B0000DC 

bmi 

$FC07C8 

VBL-Routine gesperrt? 

FC06EE 48E7FFFE 

movem.1 

D0-D7/A0-A6,-(A7) 

Register retten 

FC06F2 52B900000462 

addq.l 

#1,$462 

_vbclock erhöhen 

FC06F8 98CD 

sub. 1 

A5,A5 

A5 löschen 

FC06FA 1039FFFF8260 

move.b 

$FFFF8260,D0 

Videoauflösung holen 

FC0700 C03C0003 

and.b 

#3, DO 

Bit 0 und 1 isolieren 

FC0704 B03C0002 

cmp.b 

#2, DO 

high resolution? 

FC0708 6C18 

bge 

$FC0722 

ja 

FC070A 08390007FFFFFA01 

btst 

#7,$FFFFFA01 

Monochrom-Monitor angeschlossen? 

FC0712 6634 

bne 

$FC0748 

nein 

FC0714 303C07D0 

move.w 

#$7D0,D0 

Zähler 

FC0718 51C8FFFE 

dbra 

D0,$FC0718 

Verzögerungsschleife 

FC071C 103C0002 

move.b 

#2, DO 

high resolution 

FC0720 6016 

bra 

$FC0738 


FC0722 08390007FFFFFA01 

btst 

#7,$FFFFFA01 

Monochrom-Monitor angeschlossen? 

FC072A 671C 

beq 

$FC0748 

ja 

FC072C 102D044A 

move.b 

$44A(A5),D0 

defshiftmod 

FC0730 B03C0002 

cmp.b 

#2, DO 

high resolution? 

FC0734 6002 

blt 

$FC0738 

nein 

FC0736 4200 

clr.b 

DO 

Default ist low resolution 

FC0738 1B40044C 

move.b 

D0,$44C(A5) 

sshiftmod 

FC073C 13C0FFFF8260 

move.b 

D0,$FFFF8260 

neue Auflösung setzen 

FC0742 2060046E 

move.1 

$46E(A5),A0 

swv_vec 

FC0746 4E90 

jsr 

(A0) 

Routine für Bildschirm-Wechsel 

FC0748 61003F76 

bsr 

$FC46C0 

Cursor Blinken 

FC074C 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC074E 4AAD045A 

tst. 1 

$45A(A5) 

colorptr 

FC0752 6718 

beq 

$FC076C 

keine Farbpalette laden 

FC0754 206D045A 

move.1 

$45A(A5),A0 

colorptr 

FC0758 43F9FFFF8240 

lea 

$FFFF8240,A1 

Adresse der Farbregister 

FC075E 303C000F 

move.w 

#$F,D0 

16 Farben 

FC0762 3208 

move.w 

(A0)+,(Al)+ 

kopieren 

FC0764 51C8FFFC 

dbra 

D0,$FC0762 

nächste Farbe 

FC0768 42AD045A 

clr.l 

$45A(A5) 

colorptr löschen 

FC076C 4AAD045E 

tst.l 

$45E(A5) 

screenpt 

FC0770 671A 

beq 

$FC078C 

keine Videoadresse verändern? 

FC0772 2B60045E044E 

move.1 

$45E(A5),$44E(A5) 

screenpt nach vbsad 
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FC0778 202D044E 

move.1 

$44E(A5),D0 

_v_bs_ad 

FC077C E088 

Isr.l 

#8, DO 

Bit 8~15 

FC077E 13C0F F FF8203 

move.b 

D0,$FFFF8203 

nach dbasel 

FC0784 E048 

Isr.w 

#8,00 

Bit 16-23 

FC0786 13C0FFFF8201 

move.b 

D0,$FFFF8201 

nach dbaseh 

FC078C 61001436 

bsr 

SFC1BC4 

flopvbl, Floppy VBL-Routine 

FC0790 3E3900000454 

move.w 

$454,07 

nvbls 

FC0796 6720 

beq 

$FC07B8 

V8L-Liste leer? 

FC0798 5387 

subq.1 

#1 ,D7 

dbra-Zähler 

FC079A 207900000456 

move.l 

$456,A0 

_vblqueue 

FC07A0 2258 

move.1 

(A0)+,A1 

Adresse der Routine holen 

FC07A2 B3FC00000000 

cmp. 1 

#0,A1 

Routine nicht benutzt? 

FC07A8 670A 

beq 

$FC07B4 

zur nächsten Routine 

FC07AA 48E70180 

movem.1 

D7/A0,-(A7) 

Register retten 

FC07AE 4E91 

jsr 

(AI) 

Routine ausführen 

FC07B0 4CDF0180 

movem.1 

(A7)+,D7/A0 

Register zurückholen 

FC07B4 51CFFFEA 

dbra 

D7,$FC07A0 

nächste Routine 

FC07B8 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC07BA 4A6D04EE 

tst.w 

$4EE(A5) 

dumpflg 

FC07BE 6604 

bne 

$FC07C4 

nicht gesetzt 

FC07C0 6100058E 

bsr 

$FC0D50 

Hardcopy ausführen 

FC07C4 4CDF7FFF 

movem.1 

(A7)*,D0-D7/A0-A6 

Register zurückholen 

FC07C8 527900000452 

addq.w 

#1,$452 

vblsem 

FC07CE 4E73 

rte 


wvbl, auf VBL warten 




FC07D0 40E7 

move.w 

SR,-(A7) 

Status retten 

FC07D2 027CF8FF 

and.w 

#$F8FF,SR 

IPL 0, Interrupts freigeben 

FC07D6 203900000466 

move.1 

$466,DO 

_f rclock 

FC07DC B0B900000466 

cmp. 1 

$466,00 

noch nicht erhöht? 

FC07E2 67F8 

beq 

$FC07DC 

nein, warten 

FC07E4 460F 

move.w 

(A7)+,SR 

Status zurückholen 

FC07E6 4E75 

rts 



*************************************************************** 

Critical error handler 

FC07E8 2F3900000404 

move.1 

$404,-(A7) 

etv_critic 

FC07EE 70FF 

moveq.1 

#-1,D0 

Default ist Error 

FC07F0 4E75 

rts 


Routine ausführen 

XBIOS, TRAP #14 




FC07F2 41FA0084 

lea 

$FC0878(PC),A0 

Adresse der TRAP-#14-Routinen 

FC07F6 6004 

bra 

$FC07FC 

weiter wie BIOS 

*************************************************************** 

BIOS, TRAP #13 

FC07F8 41FA004C 

lea 

$FC0846(PC),A0 

Adresse der TRAP-#13-Routinen 

FC07FC 2279000004A2 

move.1 

$4A2,A1 

savptr laden 

FC0802 301F 

move.w 

(A7)+,D0 

Statusregister nach DO 

FC0804 3300 

move.w 

00,-(AI) 

in save area retten 

FC0806 231F 

move.1 

(A7)+,-(Al) 

Rücksprungadresse in save area 

FC0808 48E11F1F 

movem.1 

D3-D7/A3-A7,•(Al) 

Register in save area 

FC080C 23C9000004A2 

move.1 

A1,$4A2 

savptr updaten 

FC0812 0800000D 

btst 

#13,00 

Aufruf aus Supervisor-Modus? 

FC0816 6602 

bne 

$FC081A 

ja 

FC0818 4E6F 

move.l 

USP,A7 

sonst USP benutzen 

FC081A 301F 

move.w 

(A7)*,D0 

Funkt ionsnummer vom Stack holen 

FC081C B058 

cmp.w 

(A0)*,D0 

mit maximaler Nummer vergleichen 

FC081E 6C10 

bge 

$FC0830 

zu groß, ignorieren 

FC0820 E548 

Isl.w 

#2, DO 

Nunmer ols Long-Index 

FC0822 20300000 

move.1 

(A0,D0.w),00 

Adresse der Routine holen 

FC0826 2040 

move.l 

00,A0 

nach A0 

FC0828 6A02 

bpi 

$FC082C 

direkte Adresse? 

FC082A 2050 

move.l 

(AO).AO 

sonst indirekt benutzen 

FC082C 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC082E 4E90 

jsr 

(A0) 

Routine ausführen 

FC0830 2279000004A2 

move.1 

$4A2,A1 

savptr holen 

FC0836 4CD9F8F8 

movem.1 

(A1)*,D3-D7/A3A7 

Register zurückholen 

FC083A 2F19 

move.l 

(Al)♦,•(A7) 

Rücksprungadresse zurück 

FC083C 3F19 

move.w 

(AI)♦,•(A7) 

Status zurück 

FC083E 23C9000004A2 

move.1 

A1,$4A2 

savptr updaten 

FC0844 4E73 

rte 
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FC0846 OOOC 

FC0848 00FC0A46 

FC084C 00FC0984 

FC0850 00FC098C 

FC0854 00FC099C 

FC0858 80000476 

FC085C 00FC0A72 

FC0860 00FC0A8A 

FC0864 80000472 

FC0868 00FC0994 

FC086C 8000047E 

FC0870 00FC0A2E 

FC0874 00FC0A34 

dc.w 

de. 1 
de. 1 
de. 1 
de. t 

de. 1 
de. 1 
de. 1 
de. 1 
de. 1 

de. 1 
de. 1 
de. 1 

12 

SFC0A46 

JFC0984 

SFC098C 

SFC099C 

S476+S80000000 

SFC0A72 

SFC0A8A 

S472*$80000000 

SFC0994 

S47E+S80000000 

SFC0A2E 

SFC0A34 

Anzahl der Funktionen 

0, getmpb 

1, bconstat 

2, bconin 

3, bconout 

4, (indirekt) rwabs 

5, setexec 

6, tickcal 

7, (indirekt) getbpb 

8, bcostat 

9, (indirekt) mediach 

10, drvmap 

11, shift 

FC0878 

0041 

dc.w 

65 

Anzahl der Routinen 

FC087A 

00FC2F82 

de. 1 

SFC2F82 

0, initmouse 

FC087E 

00FC0670 

de. 1 

SFC0670 

1, rts 

FC0882 

00FC0A92 

de. 1 

SFC0A92 

2, physbase 

FC0886 

00FC0AA6 

de. 1 

SFC0AA6 

3, logbase 

FC088A 

00FC0AAC 

de. 1 

SFCOAAC 

4, getrez 

FC088E 

00FC0AB8 

de. 1 

SFC0AB8 

5, setscreen 

FC0892 

00FC0B06 

de. 1 

SFC0B06 

6, setpalette 

FC0896 

00FC0B0E 

de. 1 

SFCOBOE 

7, setcolor 

FC089A 

00FC1782 

de. 1 

SFC1782 

8, floprd 

FC089E 

00FC1858 

de. 1 

SFC1858 

9, flopwr 

FC08A2 

00FC1916 

de. 1 

SFC1916 

10, flopfmt 

FC08A6 

00FC0FC0 

de. 1 

SFCOFCO 

11, getdsb 

FC08AA 

00FC2O3O 

de. 1 

SFC2030 

12, midius 

FC08AE 

00FC2658 

de. 1 

SFC2658 

13, mfpint 

FC08B2 

00FC28F6 

de. 1 

SFC28F6 

14, iorec 

FC08B6 

00FC290E 

de. 1 

SFC290E 

15, rsconf 

FC08BA 

00FC3088 

de. 1 

SFC3088 

16, keytrans 

FC08BE 

00FC1510 

de. 1 

SFC1510 

17, rand 

FC08C2 

00FC15F8 

de. 1 

JFC15F8 

18, protobt 

FC08C6 

00FC1AE2 

de. 1 

SFC1AE2 

19, flopver 

FC08CA 

00FC0050 

de. 1 

SFC0D50 

20, dumpit 

FC08CE 

00FC46F2 

de. 1 

SFC46F2 

21, cursconf 

FC08D2 

00FC0EA4 

de. 1 

SFC0EA4 

22, settime 

FC08D6 

00FC0E96 

de. 1 

SFC0E96 

23, gettime 

FC08DA 

00FC30B4 

de. 1 

SFC30B4 

24, bioskeys 

FC08DE 

00FC2212 

de. 1 

SFC2212 

25, ikbdws 

FC08E2 

00FC2682 

de. 1 

SFC2682 

26, jdisint 

FC08E6 

00FC26BC 

de. 1 

SFC26BC 

27, jenabint 

FC08EA 

00FC2EFE 

de. 1 

SFC2EFE 

28, giaccess 

FC08EE 

00FC2F5C 

de. 1 

SFC2F5C 

29, offgibit 

FC08F2 

00FC2F36 

de. 1 

SFC2F36 

30, ongibit 

FC08F6 

00FC304C 

de. 1 

SFC304C 

31, xbtimer 

FC08FA 

00FC30CE 

de. 1 

SFC30CE 

32, dosound 

FC08FE 

00FC30E2 

de. 1 

SFC30E2 

33, setprt 

FC0902 

00FC3116 

de. 1 

SFC3116 

34, ikbdvecs 

FC0906 

00FC30F4 

de. 1 

SFC30F4 

35, kbrate 

FC090A 

00FC3254 

de. 1 

JFC3254 

36, prtblk 

FC090E 

OOFC07DO 

de. 1 

$FC07D0 

37, wvbl 

FC0912 

00FC097E 

de. 1 

SFC097E 

38, supexec 

FC0916 

00FC0B34 

de. 1 

SFC0B34 

39, puntaes 

FC091A 

00FC0670 

de. 1 

SFC0670 

40, rts 

FC091E 

00FC0670 

de. 1 

SFC0670 

41, rts 

FC0922 

00FC0670 

de. 1 

SFC0670 

42, rts 

FC0926 

00FC0670 

de. 1 

SFC0670 

43, rts 

FC092A 

00FC0670 

de. 1 

SFC0670 

44, rts 

FC092E 

00FC0670 

de. 1 

SFC0670 

45, rts 

FC0932 

00FC0670 

de. 1 

SFC0670 

46, rts 

FC0936 

00FC0670 

de. 1 

SFC0670 

47, rts 

FC093A 

00FC0670 

de. 1 

SFC0670 

48, rts 

FC093E 

00FC0670 

de. 1 

SFC0670 

49, rts 

FC0942 

OOFC0670 

de. 1 

SFC0670 

50, rts 

FC0946 

00FC0670 

de. 1 

SFC0670 

51, rts 
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FC094A 00FC0670 

FC094E 00FC0670 

FC0952 00FC0670 

FC0956 00FC0670 

FC095A 00FC0670 

FC095E 00FC0670 

FC0962 00FC0670 

FC0966 00FC0670 

FC096A 00FC0670 

FC096E 00FC0670 

FC0972 00FC0670 

FC0976 00FC0670 

FC097A 00FC0EF6 

de. 1 
de. 1 

de. 1 
de. 1 
de. 1 
de. 1 
dc.l 
dc.l 
dc.l 
dc.l 
dc.l 
dc.l 
dc.l 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0670 

SFC0EF6 

52, rts 

53, rts 

54, rts 

55, rts 

56, rts 

57, rts 

58, rts 

59, rts 

60, rts 

61, rts 

62, rts 

63, rts 

64, blitmode 

FC097E 206F0004 

move.1 

4(A7),A0 

Adresse holen 

FC0982 4E00 

jmp 

<A0) 

Routine im Supervisor-Modus ausführen 

FC0984 41F90000051E 

lea 

S51E.A0 

Zeiger auf Device-Tabelle 

FC098A 6016 

bra 

SFC09A2 


FC098C 41F90000053E 

lea 

$53E,A0 

Zeiger auf Device-Tabelle 

FC0992 600E 

bra 

SFC09A2 


FC0994 41F90000055E 

lea 

S55E,A0 

Zeiger auf Device-Tabelle 

FC099A 6006 

bra 

SFC09A2 


FC099C 41F90000057E 

lea 

S57E.A0 

Zeiger auf Device-Tabelle 

FC09A2 302F0004 

move.w 

4(A7),D0 

Gerätenummer 

FC09A6 E548 

Isl.w 

#2,00 

als Langwort-Index 

FC09A8 20700000 

move. 1 

(A0,D0.w),A0 

Adresse der Routine holen 

FC09AC 4E00 

jmp 

(A0) 

und ausführen 

FC09AE 00FC0670 

dc.l 

SFC0670 

0, rts 

FC09B2 00FC2138 

dc.l 

SFC2138 

1, aux 

FC09B6 00FC2226 

dc.l 

SFC2226 

2, con 

FC09BA 00FC2044 

dc.l 

SFC2044 

3, midi 

FC09BE 00FC0670 

dc.l 

SFC0670 

4, rts 

FC09C2 00FC0670 

dc.l 

SFC0670 

5, rts 

FC09C6 00FC0670 

dc.l 

SFC0670 

6, rts 

FC09CA 00FC0670 

dc.l 

SFC0670 

7, rts 

FC09CE 00FC2104 

dc.l 

SFC2104 

0, prn 

FC0902 00FC2150 

dc.l 

SFC2150 

1, aux 

FC0906 00FC223C 

dc.l 

SFC223C 

2, con 

FC090A 00FC2060 

dc.l 

SFC2060 

3, midi 

FC090E 00FC0670 

dc.l 

$FC0670 

4, rts 

FC09E2 00FC0670 

dc.l 

SFC0670 

5, rts 

FC09E6 00FC0670 

dc.l 

SFC0670 

6, rts 

FC09EA 00FC0670 

dc.l 

SFC0670 

7, rts 

FC09EE OOFC2124 

dc.l 

SFC2124 

0, prn 

FC09F2 00FC219A 

dc.l 

SFC219A 

1, aux 

FC09F6 00FC226C 

dc.l 

SFC226C 

2, con 

FC09FA 00FC21DC 

dc.l 

SFC21DC 

3, midi 

FC09FE 00FC2004 

dc.l 

SFC2004 

4, ikbd 

FC0A02 00FC0670 

dc.l 

SFC0670 

5, rts 

FC0A06 00FCO670 

dc.l 

SFC0670 

6, rts 

FC0A0A 00FC0670 

dc.l 

SFC0670 

7, rts 

FC0A0E 00FC2090 

dc.l 

SFC2090 

0, prn 

FC0A12 00FC21B4 

dc.l 

SFC21B4 

1, aux 

FC0A16 00FC434C 

dc.l 

SFC434C 

2, con 

FC0A1A 00FC2016 

dc.l 

SFC2016 

3, midi 

FC0A1E 00FC21EE 

dc.l 

SFC21EE 

4, ikbd 

FC0A22 00FC4340 

dc.l 

SFC4340 

5, ascout 

FC0A26 00FC0670 

dc.l 

SFC0670 

6, rts 

FC0A2A 00FC0670 

dc.l 

JFC0670 

7, rts 
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drvmap, aktive Drives 


FC0A2E 202D04C2 

move.l 

S4C2(A5),D0 

_drvbits 

FC0A32 4E75 

rts 






** Shift, Tastaturstatus 

FC0A34 7000 

moveq.1 

#0,00 


FC0A36 102D0E61 

move.b 

$E61(A5),D0 

Shift-Status holen 

FC0A3A 322F0004 

move.w 

4(A7),D1 

neuer Shift-Status 

FC0A3E 6B04 

bmi 

SFC0A44 

negativ, nicht setzen 

FC0A40 1B410E61 

move.b 

Dl,$E61(A5) 

neuen Shift-Status übernehmen 

FC0A44 4E75 

rts 






** getmpb, Memory Parameter Block 

FCOA46 206F0004 

move.l 

4(A7),A0 

Adresse des mpb 

FC0A4A 43ED048E 

lea 

$48E(A5),A1 

themd, Memory Descriptor 

FC0A4E 2089 

move.1 

AI,(A0) 

mp_mfl = Adresse des MD 

FC0A50 42A80004 

clr.t 

4<A0) 

mp_mal = Null 

FC0A54 21490008 

move.l 

A1,8(A0) 

mprover = Adresse des MD 

FC0A58 4291 

clr.l 

(AI) 

mlink löschen 

FC0A5A 236004320004 

move.1 

$432<A5),4(A1) 

_membot als m_start 

FC0A60 202D0436 

move.l 

S436(A5),D0 

rnemtop 

FC0A64 90AD0432 

sub. 1 

$432(A5),D0 

minus _membot 

FC0A68 23400008 

move.l 

D0,8(A1) 

Länge als mlenght 

FC0A6C 42A9000C 

clr.l 

12(A1) 

m_own = Null 

FC0A70 4E75 

rts 






setexec 

FC0A72 302F0004 

move.w 

4<A7),D0 

Exception-Nummer 

FC0A76 E548 

Isl .w 

#2, DO 

als Langwort-Index 

FC0A78 91C8 

sub. 1 

A0,A0 

A0 löschen 

FC0A7A 41F00000 

lea 

(A0,D0.w),A0 

Adresse der Exception 

FC0A7E 2010 

move.l 

(A0),D0 

alten Vektor holen 

FC0A80 222F0006 

move.l 

6(A7),D1 

neuer Vektor 

FC0A84 6B02 

bmi 

SFC0A88 

nicht setzen? 

FC0A86 2081 

move.1 

01,(A0) 

neuen Vektor übernehmen 

FC0A88 4E75 

rts 






tickcal, Timerwert in Millisekunden 

FC0A8A 4280 

clr.l 

DO 


FC0A8C 302D0442 

move.w 

S442(A5),D0 

_timerms 

FC0A90 4E75 

rts 






** physbase, physikalische Videoadresse 

FC0A92 7000 

moveq.1 

#0,00 


FC0A94 1039FFFF8201 

move.b 

SFFFF8201,D0 

dbaseh 

FC0A9A El48 

Isl.w 

#8, DO 


FC0A9C 1039FFFF8203 

move.b 

SFFFF8203,D0 

dbasel 

FC0AA2 El88 

Isl.l 

#8,00 

Ergebnis in 00 

FC0AA4 4E75 

rts 






** logbase, logische Videoadresse 

FC0AA6 202D044E 

move.1 

S44E(A5),00 

vbsad 

FC0AAA 4E75 

rts 






** getrez, Videoauflösung holen 

FCOAAC 7000 

moveq.1 

#0,00 


FCOAAE 102D8260 

move.b 

$F F F F8260(A5),DO 

shiftmod 

FC0AB2 C03C0003 

and.b 

#3,00 

Bit 0 und 1 isolieren 

FC0AB6 4E75 

rts 






"* setscrecn, Bildschirmadresse setzen 

FC0AB8 4AAF0004 

tst. 1 

4(A7) 

logische Adresse 

FCOABC 6B06 

bmi 

SFC0AC4 

nicht setzen? 

FCOABE 2B6F0004044E 

move.l 

4(A7),$44E(A5) 

vbsad 

FC0AC4 4AAF0008 

tst.l 

8(A7) 

physikalische Adresse 

FC0AC8 6B10 

bmi 

SFCOADA 

nicht setzen? 

FCOACA 13EF0009F F F F8201 

move.b 

9(A7),$FFFF8201 

dbaseh 

FC0AD2 13EF000AFFFF8203 

move.b 

10(A7),*FFFF8203 

dbasel 

FCOADA 4A6F000C 

tst.w 

12(A7) 

Videoauflösung 

FCOAOE 6B24 

bmi 

SFC0B04 

nicht setzen? 

FCOAEO 1B6F000D044C 

move.b 

13(A7),$44C(A5) 

sshiftmod 

FC0AE6 6100FCE8 

bsr 

SFC07D0 

wvbl, VBL abwarten 

FCOAEA 13ED044CFFFF8260 

move.b 

S44C(A5), SF F F F8260 

sshiftmod nach shiftmd 

FC0AF2 426D0452 

clr.w 

S452CA5) 

vblsem, VBL disabled 

FC0AF6 4EB900FCA96E 

jsr 

JFCA96E 

BiIdschirmausgabe initialisieren 
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FCOAFC 33FC000100000452 move.w #1,$452 

FC0B04 4E75 rts 

*************************************************************** 

FC0B06 2B6F0004045A move.l 4(A7),$45A(A5> 

FC0B0C 4E75 rts 

vblsem, VBL wieder freigeben 

setpalette, neue Farbpalette laden 
colorptr, Ausführung in VBL 

setcolor, einzelne Farbe setzen 
Farbnummer 

FC0B0E 322F0004 

move.w 

4(A7),D1 

FC0B12 D241 

add.w 

Dl,Dl 

mal 2 

FC0B14 C27C001F 

and.w 

#$1F,D1 

auf gültige Nummer beschränken 

FC0B18 41F9FFFF8240 

lea 

SFFFF8240.A0 

Adresse der Farbregister 

FC0B1E 30301000 

move.w 

(A0,D1.w),D0 

Farbe holen 

FC0B22 C07C0777 

and.w 

#$777,00 

RGB-Bits isolieren 

FC0B26 4A6F0006 

tst.w 

6<A7) 

neue Farbe negativ? 

FC0B2A 6B06 

bmi 

SFC0B32 

dann nicht setzen 

FC0B2C 31AF00061000 

move.w 

6(A7),(A0,D1.w) 

neue Farbe in Farbregister 

FC0B32 4E75 

rts 


puntaes, AES löschen und neu starten 
Adresse osmagic 

FC0B34 207AF4DE 

move.1 

$FC0014(PC),A0 

FC0B38 0C9087654321 

cmp. 1 

#$87654321,(A0) 

magic? 

FC0B3E 660E 

bne 

$FC0B4E 

nein, AES schon disabled 

FC0B40 B1F90000042E 

cmp. 1 

$42E,A0 

phystop, AES im ROH? 

FC0B46 6C06 

bge 

SFC0B4E 

ja, nichts zu machen 

FC0B48 4290 

clr.l 

(A0) 

magic löschen 

FC0B4A 6000F4E4 

bra 

$FC0030 

zum Reset 

FC0B4E 4E75 

rts 


term, Programm nach Exception beenden 
PC auf Stack 

FC0B50 6102 

bsr 

SFC0B54 

FC0852 4E71 

FC0B54 23DF000003C4 

nop 

move.1 

(A7)*,$3C4 

PC einschließlich Vektornummer retten 

FC0B5A 48F9FFFF00000384 

movem.1 

D0-D7/A0-A7,$384 

Register retten 

FC0B62 4E68 

move.1 

USP,A0 

USP 

FC0B64 23C8000003C8 

move.1 

A0,$3C8 

retten 

FC0B6A 700F 

moveq.1 

#15,00 

16 Worte 

FC0B6C 41F9000003CC 

lea 

$3CC,A0 

Adresse save area 

FC0B72 224F 

move.1 

A7,A1 

Stackpointer holen 

FC0B74 3009 

move.w 

(AI)♦,(A0)+ 

16 Worte vom Stack holen 

FC0B76 51C8FFFC 

dbra 

D0,$FC0B74 

nächstes Wort 

FC0B7A 23FC1234567800000380 

move.1 

#$12345678,$380 

magic für gerettete Register 

FC0B84 7200 

moveq.1 

#0,01 


FC0B86 1239000003C4 

move.b 

$3C4,D1 

Vektornurmer nach Dl 

FC0B8C 5341 

subq.w 

#1, D1 

als dbra-Zähler 

FC0B8E 6116 

bsr 

$FC0BA6 

entsprechende Anzahl 'Bomben' ausgeben 

FC0B90 23FC0000093A000004A2 

move.1 

#$93A,$4A2 

saveptr für BIOS rücksetzen 

FC0B9A 3F3C0001 

move.w 

#1,•(A7) 

Returncode für Error 

FC0B9E 42A7 

clr.l 

* (A7) 

term, Programm beenden 

FCOBAO 4E41 

trap 

#1 

GEMDOS 

FC0BA2 6000F48C 

bra 

$FC0030 

falls Rückkehr, dann Reset 
'Bomben' auf Bildschirm schreiben 
shiftmd, Auflösung holen 

FC0BA6 1E39FFFF8260 

move.b 

$FFFF8260,D7 

FCOBAC CE7C0003 

and.w 

#3,07 

Bit 0 und 1 isolieren 

FCOBBO DE47 

add.w 

D7,D 7 

als Wortzeiger 

FC0BB2 4280 

clr.l 

00 


FC0BB4 1039FFFF8201 

move.b 

$F F F F8201,00 

dbaseh 

FCOBBA El48 

Isl.w 

#8, DO 


FCOBBC 1039FFFF8203 

move.b 

$FFFF8203,00 

dbasel 

FC0BC2 E188 

Isl.l 

#8,00 

ergibt physikalische Videoadresse 

FC0BC4 2040 

move.1 

00, A0 

nach A0 

FC0BC6 D0FB702C 

add.w 

$FC0BF4(PC,D7.w),A0 

plus Offset für BiIdschirmnitte 

FCOBCA 43F900FC00FA 

lea 

$FC0DFA,A1 

Adresse des Bitmusters der 'Bomben' 

FCOBDO 3C3C000F 

move.w 

#$F,06 

16 Rasterzeilen 

FC0BD4 3401 

move.w 

Dl,02 


FC0B06 2448 

move.1 

A0.A2 

Zeiger auf Beginn der Zeile merken 

FC0BD8 3A3B7022 

move.w 

$FC0BFC(PC,D7.w),D5 

Anzahl der Worte (Bildebenen) 

FCOBDC 3001 

move.w 

(Al>,(A0 >♦ 

eine Rasterzeile schreiben 

FCOBDE 51CDFFFC 

dbra 

05,$FC0BDC 

nächste Bildebene 

FC0BE2 51CAFFF4 

dbra 

D2,$FC0BD8 

nächste 'Bombe', gleiche Rasterzeile 

FC0BE6 5449 

addq.w 

#2, AI 

nächstes Wort des Bitmusters 

FC0BE8 D4FB701A 

add.w 

$FC0C04(PC,D7.w),A2 

plus Zeilenlänge, nächste Zeile 







Das BIOS-Listing 


395 


FCOBEC 204A 

FCOBEE 51CEFFE4 

FC0BF2 4E75 

move.1 
dbra 

rts 

A2,A0 

D6,SFC0BD4 

Beginn der Zeile 
nächste Rasterzeile 

Offset für BiIdschirmmitte 

low resolution 

FC0BF4 

3E80 

dc.w 

100*160 

FC0BF6 

3E80 

dc.w 

100*160 

medium reolution 

FC0BF8 

3E80 

dc.w 

200*80 

high resolution 

FCOBFA 

3E80 

dc.w 

200*80 

high resolution 

Anzahl der Bildebenen minus 1 
low resolution 

FCOBFC 

0003 

dc.w 

3 

FCOBFE 

0001 

dc.w 

1 

medium resolution 

FCOCOO 

0000 

dc.w 

0 

high resolution 

FC0C02 

0000 

dc.w 

0 

high resolution 

Zeilenlänge in Bytes 
low resolution 

FC0C04 

OOAO 

dc.w 

160 

FC0C06 

OOAO 

dc.w 

160 

low resolution 

FC0C08 0050 

dc.w 

80 

high resolution 

FCOCOA 

0050 

dc.w 

80 

high resolution 

fastcpy, Floppysektor kopieren 

Quelladresse 

FCOCOC 

206F0004 

move.1 

4<A7),A0 

FC0C10 

226F0008 

move.1 

8(A7),A1 

Zieladresse 

FC0C14 

303C003F 

move.w 

#63,00 

(63+1)*8 = 512 Bytes 

FC0C18 

12D8 

move.b 

(A0)+,(AI)+ 


FC0C1A 

1208 

move.b 

(A0)+,(AI)+ 


FC0C1C 

12D8 

move.b 

(A0)+,(AI)+ 


FC0C1E 

1208 

move.b 

<A0)+,(Al)+ 


FC0C20 

1208 

move.b 

(A0)+,(Al)+ 

jeweils 8 Bytes kopieren 

FC0C22 

12D8 

move.b 

(A0)+,(AI)+ 


FC0C24 

12D8 

move.b 

(A0)+,(AI)♦ 


FC0C26 

1208 

move.b 

(A0)+,(Al)+ 


FC0C28 

51C8FFEE 

dbra 

D0.SFC0C18 

nächste 8 Bytes 

FC0C2C 4E75 rts 

*************************************************************** 

hdvinit, Laufwerksdaten initialisieren 

FC0C2E 

2F390000046A 

move.1 

$46A,-(A7) 

hdv_init 

FC0C34 

4E75 

rts 


Routine ausführen 


FC0C36 5C4155544F5C 

dc.b 

' \AUTOV 


FC0C3C 2A2E50524700 

dc.b 

■*.PRG',0 


FC0C42 12345678 

de. 1 

$12345678 


FC0C46 9ABCDEF0 

de. 1 

S9ABCDEF0 


*************************************************************** 

autoexec, Programme im AUTO-Ordner ausf 

FC0C4A 41FAFFEA 

lea 

$FC0C36(PC),A0 

Adresse Pfadname '\AUTO\*.PRG' 

FC0C4E 43FAFFEC 

lea 

$FC0C3C(PC), AI 

Adresse Filename '*.PRG' 

FC0C52 23DF00000980 

move.1 

(A7)+,$980 

Rücksprungadresse merken 

FC0C58 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC0C5A 2B480984 

move.1 

A0,$984(A5) 

Pfadname 

FC0C5E 2B490988 

move.1 

A1,$988(A5) 

Filename 

FC0C62 202D04C2 

move.1 

$4C2(A5),D0 

drvbits 

FC0C66 323900000446 

move.w 

$446,01 

_bootdev 

FC0C6C 0300 

btst 

Dl,DO 

Drive aktiv? 

FC0C6E 6736 

beq 

$FC0CA6 

nein, fertig 

FC0C70 41FAF8C5 

lea 

$FC0537(PC),A0 

Zeiger auf Nullname 

FC0C74 2F08 

move.1 

A0,*(A7) 

Environment 

FC0C76 2F08 

move.l 

A0,-(A7) 

Command Tai l 

FC0C78 2F08 

move.1 

A0,*(A7) 

Filler 

FC0C7A 3F3C0005 

move.w 

#5,•(A7) 

Basepage erzeugen 

FC0C7E 3F3C004B 

move.w 

#$4B,-(A7) 

Pexec 

FC0C82 4E41 

trap 

#1 

GEHDOS 

FC0C84 DEFC0010 

add.w 

#$10,A7 

Stackpointer korrigieren 

FC0C88 2040 

move.1 

D0,A0 

Adresse der Basepage 

FC0C8A 217C00FC0CAE0008 

move.1 

#$FC0CAE,8(A0) 

Startadresse in Basepage eintragen 

FC0C92 2F0B 

move.1 

A3,-(A7) 

Dummy-Adresse 

FC0C94 2F00 

move.1 

DO,-(A7) 

Basepage 

FC0C96 2F0B 

move.1 

A3,•(A7) 

Dummy-Adresse 

FC0C98 3F3C0004 

move.w 

#4,•(A7) 

Programm starten 

FC0C9C 3F3C004B 

move.w 

#$4B,-(A7) 

Pexec 

FC0CA0 4E41 

trap 

#1 

GEMDOS 

FC0CA2 DEFC0010 

add.w 

#$10,A7 

Stackpointer korrigieren 
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FC0CA6 2F3900000980 

move.1 

$980,-<A7) 

Rücksprungadresse zurück 

FCOCAC 4E75 

rts 






* autoexec-Programm ausführen 

FCOCAE 42A7 

clr.l 

•CA7) 


FCOCBO 3F3C0020 

move.w 

#$20,-<A7) 

Super 

FC0CB4 4E41 

trap 

#1 

GEHDOS 

FC0CB6 5C4F 

addq.w 

#6,A7 

Stackpointer korrigieren 

FC0CB8 2840 

move. 1 

00, A4 

geretter Stackpointer 

FCOCBA 2A6F0004 

n»ve. 1 

4(A7),A5 

Adresse der Basepage 

FCOCBE 4FED0100 

lea 

S100(A5),A7 

Stackpointer auf Ende der Basepage 

FC0CC2 2F3C00000100 

move.1 

#$100,-(A7) 

$100 Bytes für Basepage 

FC0CC8 2F0D 

move.1 

A5,(A7) 

Adresse der Basepage 

FCOCCA 4267 

clr.w 

• (A7) 


FCOCCC 3F3C004A 

move.w 

#$4A, (A7) 

Setblock, Speicher freigeben 

FCOCDO 4E41 

trap 

#1 

GEMDOS 

FC0CD2 5C4F 

addq.w 

#6,A7 

Stackpointer korrigieren 

FC0CD4 4A40 

tst.w 

DO 

ok? 

FC0CD6 666A 

bne 

SFC0D42 

nein, abbrechen 

FC0CD8 3F3C0007 

move.w 

#7,-(A7) 

R/O, Hidden und Systemfiles 

FCOCDC 2F3900000984 

move.1 

$984,-(A7) 

Filename 

FC0CE2 3F3C004E 

move.w 

#$4E,-(A7) 

Search First 

FC0CE6 7E08 

moveq.l 

#8,07 

Bytes für Stack-Korrektur 

FC0CE8 48790000098C 

pea 

$98C 

DTA-Adresse für GEMDOS 

FCOCEE 3F3C001A 

move.w 

#$1A,•(A7) 

Setdta 

FC0CF2 4E41 

trap 

#1 

GEMDOS 

FC0CF4 5C4F 

addq.w 

#6, A7 

Stackpointer korrigieren 

FC0CF6 4E41 

trap 

#1 

GEMDOS 

FC0CF8 DEC7 

add.w 

D7,A7 

Stackpointer korrigieren 

FCOCFA 4A40 

tst.w 

00 

passendes File gefunden? 

FCOCFC 6644 

bne 

$FC0D42 

nein 

FCOCFE 207900000984 

move.1 

$984,A0 

Pfadname 

FC0D04 247900000988 

move.1 

$988,A2 

Filename 

FCODOA 43F9000009B8 

lea 

$9B8,Al 

Autoname 

FC0D10 12D8 

move.b 

(A0)+,(Al )♦ 

Pfadteil kopieren 

FC0D12 B5C8 

cmp. 1 

A0.A2 

Ende des Pfadteils? 

FC0D14 66FA 

bne 

$FCQD10 

nein, weiter kopieren 

FC0D16 41F9000009AA 

lea 

$9AA,A0 

Name aus DTA-Puffer 

FC0D1C 1208 

move.b 

(A0)+,(AI>♦ 

an Pfadnamen anhängen 

FCOD1E 66FC 

bne 

$FC0D1C 

Ende des Namens? 

FC0D20 487AF815 

pea 

$FC0537(PC) 

Nullname 

FC0D24 487AF811 

pea 

$FC0537(PC) 

NulIname 

FC0D28 4879000009B8 

pea 

$9B8 

Filename 

FC002E 4267 

clr.w 

* (A7) 

Programm laden und starten 

FC0D30 3F3C004B 

move.w 

#$4B,-(A7) 

Pexec 

FC0D34 4E41 

trap 

#1 

GEMDOS 

FC0D36 DEFC0010 

add.w 

#$10,A7 

Stackpointer korrigieren 

FC0D3A 7E02 

moveq.1 

#2,D7 

Bytes für Stackkorrektur 

FC0D3C 3F3C004F 

move.w 

#$4F,-(A7) 

Search Next 

FC0040 60A6 

bra 

$FC0CE8 

nächstes Programm 

FC0D42 4FF90000755A 

lea 

$755A,A7 

Stackpointer auf Startwert 

FC0048 2F3900000980 

move.1 

$980, (A7) 

Rücksprungadresse 

FC0D4E 4E75 

rts 






'* scrdmp. BiIdschirm-Hardcopy 

FC0D50 207900000502 

move.1 

$502,A0 

dump_vec 

FC0D56 4E90 

jsr 

(A0) 

Routine ausführen 

FC0058 33FCFFFF000004E E 

move.w 

#* 1,$4 E E 

dumpfig löschen 

FC0060 4E75 

rts 






'* scrdmp 

FC0D62 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC0064 2B60044E09D8 

move.1 

$44E(A5),$908(A5) 

_v_bs_ad 

FC0D6A 426O09DC 

clr.w 

$90C(A5) 

Offset auf Null 

FC0D6E 4240 

clr.w 

DO 


FC0070 102D044C 

move.b 

$44C(A5),D0 

sshiftmod 

- FC0074 3B4009E6 

move.w 

D0,$9E6(A5) 

merken 

FC0078 0040 

add.w 

DO,DO 

mal 2 

FC0D7A 41FA006A 

lea 

$FC00E6(PC),A0 

Tabelle für Bildschirmauflösung 

FC007E 3B700000090E 

move.w 

(A0,D0.w),$9OE(A5) 

Bildschirmbreite holen 

FC0D84 3B70000609E0 

move.w 

6(A0,D0.w),$9E0(A5> 

Bildschirmhöhe holen 
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FC0D8A 

426D09E2 

clr.w 

S9E2(A5) 

FC0D8E 

426D09E4 

clr.w 

$9E4(A5) 

FC0D92 

2B7C00FF824009EA 

move.1 

#SFF8240,$9EA(A5) 

FC0D9A 

426009F2 

clr.w 

S9F2(A5) 

FC0D9E 

322D0E90 

move.w 

SE90(A5),D1 

FC00A2 

E649 

Isr.w 

#3,Dl 

FC00A4 

C27C0001 

and.w 

#1 ,D1 

FC0DA8 

3B4109E8 

move.w 

D1,S9E8(A5) 

FCODAC 

322D0E90 

move.w 

$E90(A5),D1 

FCODBO 

3001 

move.w 

Dl,DO 

FC0DB2 

E848 

Isr.w 

#4, DO 

FC0DB4 

C07C0001 

and.w 

#1,00 

FC0DB8 

3B4009F0 

move.w 

D0,$9F0(A5) 

FCODBC 

C27C0007 

and.w 

#7,Dl 

FC0DC0 

103B1030 

move.b 

SFC0DF2(PC,Dl.w),D0 

FC0DC4 

33C0000009EE 

move.w 

D0.S9EE 

FC00CA 

486D09D8 

pea 

S9D8(A5) 

FC00CE 

33FC0001000004EE 

move.w 

#1,S4EE 

FC0DD6 

6100247C 

bsr 

SFC3254 

FCOODA 

33FCFFFF000004EE 

move.w 

#•1,$4EE 

FC0DE2 

584F 

addq.w 

#4,A7 

FC00E4 

4E75 

rts 


FC0DE6 

0140 

dc.w 

320 

FC0DE8 0280 

dc.w 

640 

FCODEA 0280 

dc.w 

640 

FC0DEC 

00C8 

dc.w 

200 

FC0DEE 

00C8 

dc.w 

200 

FC0DF0 0190 

dc.w 

400 

FC00F2 00 

dc.b 

0 

FC0DF3 02 

dc.b 

2 

FC0DF4 

01 

dc.b 

1 

FC0OF5 

FF 

dc.b 

•1 

FCOOF6 03 

dc.b 

3 

FC0DF7 

FF 

dc.b 

-1 

FC0DF8 

FF 

dc.b 

-1 

FC0DF9 

FF 

dc.b 

•1 

FC0DFA 

0600 

dc.w 

X0000011000000000 

FC0DFC 

2900 

dc.w 

X0010100100000000 

FC0DFE 

0080 

dc.w 

*0000000010000000 

FC0E00 

4840 

dc.w 

X0100100001000000 

FC0E02 

11F0 

dc.w 

X0001000111110000 

FC0E04 

01F0 

dc.w 

*0000000111110000 

FC0E06 

07FC 

dc.w 

X0000011111111100 

FC0E08 

0FFE 

dc.w 

X0000111111111110 

FC0E0A 

0FFE 

dc.w 

X0000111111111110 

FC0E0C 

1FFF 

dc.w 

X0001111111111111 

FC0E0E 

1 FE F 

dc.w 

X0001111111101111 

FC0E10 

0FEE 

dc.w 

X0000111111101110 

FC0E12 

0FDE 

dc.w 

X0000111111011110 

FC0E14 

07FC 

dc.w 

X0000011111111100 

FC0E16 

03F8 

dc.w 

X0000011111111000 

FC0E18 

00E0 

dc.w 

X0000000011100000 

FC0E1A 

41F9FFFFFA21 

lea 

JFFFFFA21,A0 

FC0E20 

43F9FFFFFA1B 

lea 

$FFFFFA1B,A1 

FC0E26 

12BC0010 

move.b 

# $10,(AI) 

FC0E2A 

7801 

moveq.1 

# 1 ,D4 

FC0E2C 

12BC0000 

move.b 

#0,(Al) 

FC0E30 

10BC00F0 

move.b 

#$F0,(A0) 

FC0E34 

13FC0008FFFFFA1B 

move.b 

#8,$FFFFFA1B 

FC0E3C 

1010 

move.b 

(A0),D0 

FC0E3E 

B004 

cmp.b 

04,00 

FC0E40 

66FA 

bne 

SFC0E3C 

FC0E42 

1810 

move.b 

(A0),D4 


links 

und rechts auf Null 
Adresse der Farbpalette 
Maskenzeiger löschen 
Druckerkonfiguration holen 
Test / Qualitäts-Modus 
Bit isolieren 
und merken 

Druckerkonfiguration holen 

Parallel / Seriell 
Bit isolieren 
und merken 

Druckertyp isolieren 
Zuordnung aus Tabelle holen 
und für Hardcopy merken 
Adresse des Parameterblocks 
_duipflg auf eins 
Hardcopy ausführen 
_dumpflg löschen 
Stackpointer korrigieren 

Bildschirmbreite in Pixel 


BiIdschirmhöhe in Pixel 


Druckertypen (-1 = nicht implementiert) 

ATARI S/U Matrix 

ATARI S/U Typenrad 

ATARI Färb Matrix 

(ATARI Färb Typenrad) 

Epson S/U Matrix 
(Epson S/U Typenrad) 

(Epson Färb Matrix) 

(Epson Färb Typenrad) 

Bitmuster 'Bomben' 


MFP, Timer B Data 
MFP, Timer B Control 
Timer B Ausgang low 

Timer B stoppen 

Timer B Zahler mit 240 laden 

Timer B Control, Delay Modus, /50 

Zahlerwert laden 

gleich letztem Uert? 

nein, warten 

Zählerwert laden 
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FC0E44 363C0267 

move.w 

#$267,D3 

Schleifenzähler auf 616 

FC0E48 B810 

cmp.b 

(A0),D4 

Zählerwert noch gleich? 

FC0E4A 66F6 

bne 

SFC0E42 

nein, neuen Wert lesen 

FC0E4C 51CBFFFA 

dbra 

D3,$FC0E48 

nächster Durchlauf 

FC0E50 12BC0010 

move.b 

#$10,(AI) 

Timer B Ausgang low 

FC0E54 4ED6 

jmp 

(A6) 

zurück zum Aufruf 

*************************************************************** 

reset-residente Programme ausführen 

FC0E56 20790000042E 

move.1 

$42E,A0 

phystop 

FC0E5C 90FC0200 

sub.w 

#$200,A0 

minus $200 

FC0E60 BlFC00000400 

cmp. 1 

#$400,A0 

schon Exceptions erreicht? 

FC0E66 672C 

beq 

$FC0E94 

ja, fertig 

FC0E68 0C9012123456 

cmp. 1 

#$12123456,(A0) 

magic? 

FC0E6E 66EC 

bne 

$FC0E5C 

nein 

FC0E70 B1E80004 

cmp. 1 

4(A0),A0 

aktuelle Adresse hinter magic? 

FC0E74 66E6 

bne 

$FC0E5C 

nein 

FC0E76 4240 

clr.w 

DO 

Summe löschen 

FC0E78 2248 

move.1 

A0,A1 

Adresse merken 

FC0E7A 323C00FF 

move.w 

#$FF,D1 

Zähler auf 256 

FC0E7E D059 

add.w 

(AI)+,D0 

Checksumme bi Iden 

FC0E80 51C9FFFC 

dbra 

Dl,$FC0E7E 

nächstes Wort 

FC0E84 B07C5678 

cmp.w 

#$5678,DO 

gleich magic? 

FC0E88 6602 

bne 

$FC0E5C 

nein 

FC0E8A 2F08 

move.1 

A0,-(A7) 

Adresse merken 

FC0E8C 4EA80008 

jsr 

8(A0) 

Routine ausführen 

FC0E90 205F 

move.1 

(A7)+,A0 

Adresse zurückholen 

FC0E92 60C8 

bra 

$FC0E5C 

weiter suchen 

FC0E94 4E75 

rts 



*************************************************************** 

gettime 

FC0E96 47F900FC4C9E 

lea 

$FC4C9E,A3 

Routine für Hardware-Uhr 

FC0E9C 49F900FC1F52 

lea 

$FC1F52,A4 

Routine für lKBD-Uhr 

FC0EA2 600C 

bra 

$FC0EB0 


*************************************************************** 

settime 

FC0EA4 47F900FC4D5C 

lea 

$FC4D5C,A3 

Routine für Hardware-Uhr' 

FCOEAA 49F900FC1F6C 

lea 

$FC1F6C,A4 

Routine für IKBD-Uhr 

FCOEBO 61003DB4 

bsr 

$FC4C66 

Hardware-Uhr vorhanden? 

FC0EB4 6402 

bcc 

$FC0EB8 

ja 

FC0EB6 264C 

move.1 

A4, A3 

sonst Adresse der IKBD-Uhr verwenden 

FC0EB8 4ED3 

jmp 

(A3) 

Routine ausführen 




ROM-Header ins RAM kopieren 

FCOEBA 41FAF144 

lea 

$FC0000(PC),A0 

Startadresse des ROMs 

FCOEBE 43F900000940 

lea 

$940,AI 

Zieladresse im RAM 

FC0EC4 702F 

moveq.1 

#47,DO 

48 Bytes 

FC0EC6 13B000000000 

move.b 

(A0,D0.w),(Al,D0.w) 

Byte kopieren 

FCOECC 51C8FFF8 

dbra 

D0,$FC0EC6 

nächstes Byte 

FCOEDO 337A001CFFFA 

move.w 

$FC0EEE(PC),-6(A1) 

JMP-Befehl vor Header-Kopie 

FC0ED6 23690004FFFC 

move.1 

4(Al),-4(A1) 

Reset-Adresse als JMP-Operand 

FCOEDC 32BA0016 

move.w 

$FC0EF4(PC),(A1) 

Branch-Befehl auf JMP als Header-Start 

FCOEEO 3369001E001C 

move.w 

30(A1),28(A1) 

System-Datum nach PAL-Flag (?) 

FC0EE6 23C9000004F2 

move.1 

A1,$4F2 

sysbase auf Header im RAM 

FCOEEC 4E75 

rts 



FCOEEE 4EF900000000 

jmp 

$0 

JMP-Befehl 

FC0EF4 60F8 

bra 

$FC0EEE 

Blitmode, Blitter-Konfiguration 




FC0EF6 6122 

bsr 

$FC0F1A 

Test ob Blitter vorhanden 

FC0EF8 3800 

move.w 

D0,D4 

Ergebnis merken 

FCOEFA 3A00 

move.w 

D0,D5 


FCOEFC E24D 

Isr.w 

#1 ,D5 

Blitter vorhanden Flag nach Bit 0 

FCOEFE 8A7CFFFE 

or.w 

#$FFFE,D5 

Maske für Blitter ein 

FC0F02 61003F5C 

bsr 

$FC4E60 

Blitter-Status holen 

FC0F06 3600 

move.w 

D0,D3 

und merken 

FC0F08 302F0004 

move.w 

4(A7),D0 

Funktionsparameter 

FCOFOC 6B08 

bmi 

$FC0F16 

nur Status holen? 

FCOFOE C045 

and.w 

D5,D0 

Blitter an nur wenn Blitter vorhanden 

FC0F10 8044 

or.w 

D4,D0 

Blitter vorhanden Flag dazu 

FC0F12 61003F24 

bsr 

$FC4E38 

Blitter-Vektoren setzen 

FC0F16 3003 

move.w 

03,DO 

alten Status als Funktionswert 

FC0F18 4E75 

rts 
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FC0F1A 40C1 

FC0F1C 303C0000 

FC0F20 91C8 

FC0F22 24AF 

FC0F24 007C0700 

FC0F28 22680008 

FC0F2C 217C00FC0F3A0008 
FC0F34 4A688A00 

FC0F38 7002 

FC0F3A 21490008 

FC0F3E 46C1 

FC0F40 2E4A 

FC0F42 4E75 

move.w 

move.w 

sub. 1 

move.1 

or.w 

move.1 

move.1 

tst.w 
moveq.1 
move.1 

move.w 

move.1 

rts 

SR ,01 
#0,00 

A0.A0 

A7,A2 
#4700,SR 

8(A0),A1 

#$FC0F3A,8(A0) 

$FFFF8A00(A0) 

#2, DO 

A1,8(A0) 

Dl,SR 

A2,A 7 

** Test ob Blitter vorhanden 

Statusregister merken t 

Default: kein Blitter 

AO löschen 

Stackpointer merken 

IPL 7, Interrupts sperren 
Buserror-Vektor merken 

neuer Buserror-Vektor 

Versuch auf Blitter zuzugreifen 
kein Buserror, Flag für Blitter setzen 
alten Buserror-Vektor wieder hersteilen 
Status zurückholen 

Stackpointer zurück 




** hdv_init, Drives initialisieren 

FC0F44 4E56FFF0 

link 

A6,#-16 


FC0F48 23FC0000012C00002A46 

move.1 

#300,52A46 

maxacctim auf 300 * 20 ms = 6 Sekunden 

FC0F52 4240 

clr.w 

00 


FC0F54 33C0000004A6 

move.w 

00.S4A6 

_nflops löschen 

FC0F5A 33C000007DC4 

move.w 

D0,*7DC4 

curflop, aktuelles Drive 

FC0F60 3D40FFFE 

move.w 

DO,-2(A6) 

mit Drive A beginnen 

FC0F64 604E 

bra 

4FC0FB4 

ans Schleifenende 

FC0F66 207C0000755A 

move.1 

#4755A,A0 

Adresse des dsb (Device Status Block) 

FC0F6C 326EFFFE 

move.w 

•2(A6),A1 

Drive-Nummer 

FC0F70 D1C9 

add. 1 

A1.A0 

als Index 

FC0F72 4210 

clr.b 

(AO) 

dsb löschen 

FC0F74 4257 

clr.w 

<A 7) 


FC0F76 4267 

clr.w 

(A7) 


FC0F78 4267 

clr.w 

• (A7) 


FC0F7A 3F2EFFFE 

move.w 

-2(A6),-(A7) 

Drive-Nummer 

FC0F7E 42A7 

clr.l 

• (A7) 


FC0F80 42A7 

clr.l 

■ (A7) 


FC0F82 4EB900FC173A 

jsr 

$FC173A 

flopini 

FC0F88 DFFC0000000E 

add. 1 

#4E,A7 

Stackpointer korrigieren 

FC0F8E 3F00 

move.w 

00, (A7) 

Fehlercode merken 

FC0F90 306EFFFE 

move.w 

•2(A6),A0 

Drive-Nummer 

FC0F94 D1C8 

add. 1 

A0,A0 

als Index 

FC0F96 D1FC00008062 

add. 1 

#48062,AO 


FC0F9C 309F 

move.w 

(A7)+,(AO) 

Fehlercode merken 

FC0F9E 6610 

bne 

4FC0FB0 

Drive nicht vorhanden? 

FC0FA0 5279000004A6 

addq.w 

#1,44A6 

_nflops erhöhen 

FC0FA6 00B900000003000004C2 

or. 1 

#3,44C2 

drvbits, Drive A und B 

FCOFBO 526EFFFE 

addq.w 

#1,-2(A6) 

Drive-Nurrmer erhöhen 

FC0FB4 0C6E0002FFFE 

cmp.w 

#2,-2(A6) 

schon 2 Drives getestet? 

FCOFBA 60AA 

blt 

4FC0F66 

nein, nächstes Drive 

FCOFBC 4E5E 

unlk 

A6 


FCOFBE 4E75 

rts 






'** getdsb 

FCOFCO 4E56FFFC 

link 

A6,#*4 


FC0FC4 4280 

clr.l 

DO 

Null 

FC0FC6 4E5E 

unlk 

A6 


FC0FC8 4E75 

rts 






getbpb, Get BIOS Parameterblock 

FCOFCA 4E56FFF4 

link 

A6,#-12 


FCOFCE 48E7070C 

movem.1 

05-07/A4-A5,-(A7) 

Register retten 

FC0FD2 0C6E00020008 

cmp.w 

#2,8(A6) 

Drive-Normer < 2? 

FC0FD8 6006 

blt 

4FC0FE0 

ja, ok 

FCOFDA 4280 

clr.l 

DO 

Null, Fehler 

FCOFDC 60000192 

bra 

4FC1170 

zum Funktionsende 

FCOFEO 302E0008 

move.w 

8(A6),D0 

Drive-Nummer 

FC0FE4 EB40 

asl .w 

#5,00 

mal 32 

FC0FE6 48C0 

ext. 1 

00 


FC0FE8 2A40 

move.1 

D0,A5 


FCOFEA DBFC00007570 

add. 1 

#47570,A5 

plus Basisadresse 

FCOFFO 284D 

move.1 

A5,A4 


FC0FF2 3EBC0001 

move.w 

#1,(A7) 

count, einen Sektor lesen 

FC0FF6 4267 

clr.w 

* (A7) 

Seite 0 

FC0FF8 4267 

clr.w 

•<A 7) 

Track 0 
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FCOFFA 3F3C0001 

move.w 

#1,-(A7) 

Sektor 1 

FCOFFE 3F2E0008 

move.w 

8(A6),-(A7) 

Drive-Nummer 

FC1002 42A7 

clr.l 

• (A7) 

Filler 

FC1004 2F3C000016DA 

move.1 

#$16DA,■(A7) 

Adresse Diskpuffer 

FC100A 4EB900FC1782 

jsr 

SFC1782 

Sektor lesen 

FC1010 DFFC00000010 

add. 1 

#$10,A7 

Stackpointer korrigieren 

FC1016 2D40FFF4 

move.1 

DO,-12(A6) 

Fehlercode 

FC101A 4AAEFFF4 

tst.l 

•12(A6) 

testen 

FC101E 6C16 

bge 

SFC1036 

ok? 

FC1020 3EAE0008 

move.w 

8(A6),(A7) 

Drive-Nummer 

FC1024 202EFFF4 

move.1 

-12(A6),D0 

Fehlercode 

FC1028 3F00 

move.w 

DO,-(A7) 

als Parameter 

FC102A 4EB900FC07E8 

jsr 

SFC07E8 

critical error handler 

FC1030 548F 

addq.1 

#2,A 7 

Stackpointer korrigieren 

FC1032 2D40FFF4 

move.1 

DO,•12(A6) 

Fehlercode merken 

FC1036 202EFFF4 

move.1 

•12(A6),D0 

testen 

FC103A B0BC00010000 

cmp. 1 

#$10000,DO 

Retry? 

FC1040 67B0 

beq 

$FC0FF2 

ja, noch ein Versuch 

FC1042 4AAEFFF4 

tst.l 

•12(A6) 

Fehlercode testen 

FC1046 6C06 

bge 

$FC104E 

ok? 

FC 1048 4280 

clr.l 

DO 

Null als Ergebnis 

FC104A 60000124 

bra 

$FC1170 

zum Funktionsende 

FC104E 2EBC000016E5 

move.1 

#$16E5,(A7) 

Puffer+11, Bytes pro Sektor 

FC1054 610006BE 

bsr 

$FC1714 

u2i, 8086- in 68000-Format 

FC1058 3E00 

move.w 

D0,D7 

Bytes pro Sektoren merken 

FC105A 6F0E 

ble 

$FC106A 

<= 0, dann Fehler 

FC105C 1C39000016E7 

move.b 

$16E7,D6 

Puffer+13, Sektoren pro Cluster 

FC1062 4886 

ext.w 

D6 


FC1064 CC7C00FF 

and.w 

#$FF,D6 


FC1068 6E06 

bgt 

$FC1070 

> 0, ok 

FC106A 4280 

clr.l 

DO 

Null als Ergebnis 

FC106C 60000102 

bra 

$FC1170 

zum Funktionsende 

FC1070 3887 

move.w 

D7,(A4) 

recsize in bpb eintragen 

FC1072 39460002 

move.w 

D6,2(A4) 

clsiz in bpb eintragen 

FC1076 2EBC000016F0 

move.1 

#$16F0,(A7) 

Puffer+22, Sektoren per FAT 

FC107C 61000696 

bsr 

$FC1714 

u2i, 8086- in 68000-Format 

FC1080 39400008 

move.w 

D0,8(A4) 

fsiz in bpb eintragen 

FC 1084 302C0008 

move.w 

8(A4),D0 

fsiz 

FC1088 5240 

addq.w 

#1 ,D0 

plus 1 

FC108A 3940000A 

move.w 

DO,10CA4) 

als fatrec in bpb eintragen 

FC108E 3014 

move.w 

(A4),DO 

recsize 

FC1090 C1EC0002 

muls.w 

2(A4),D0 

mal clsiz 

FC1094 39400004 

move.w 

D0,4(A4) 

als clsizb in bpb eintragen 

FC1098 2EBC000016EB 

move.1 

#$16EB,(A7) 

Puffer+17, Anzahl Directory-Einträge 

FC109E 61000674 

bsr 

$FC1714 

u2i, 8086- in 68000-Format 

FC10A2 EB40 

asl .w 

#5,DO 

mal 32 

FC10A4 48C0 

ext.l 

DO 


FC10A6 81D4 

divs.w 

(A4),DO 

durch recsiz 

FC10A8 39400006 

move.w 

D0,6(A4) 

als rdlen in bpb eintragen 

FC10AC 302C000A 

move.w 

10(A4),D0 

fatrec 

FC10B0 D06C0006 

add.w 

6(A4),D0 

plus rdlen 

FC10B4 D06C0008 

add.w 

8(A4),D0 

plus fsiz 

FC10B8 3940000C 

move.w 

DO,12(A4) 

als datrec in bpb eintragen 

FC10BC 2EBC000016ED 

move.1 

#$16ED,(A7) 

Puffer+19, Anzahl Sektoren 

FC10C2 61000650 

bsr 

$FC1714 

u2i, 8086- in 68000-Format 

FC10C6 906C000C 

sub.w 

12(A4),D0 

minus datrec 

FC10CA 48C0 

ext.l 

DO 


FC10CC 81EC0002 

divs.w 

2(A4),D0 

durch clsiz 

FC10D0 3940000E 

move.w 

DO,14(A4) 

als numcl in bpb eintragen 

FC10D4 2EBC000016F4 

move.1 

#$16F4,(A7) 

Puffer+26, Anzahl Seiten 

FC10DA 61000638 

bsr 

$FC1714 

u2i, 8086- in 68000-Format 

FC10DE 3B400014 

move.w 

DO,20(A5) 

als dnsides in bpb eintragen 

FC10E2 2EBC000016F2 

move.1 

#$16F2,(A7) 

Puffer+24, Sektoren pro Track 

FC10E8 6100062A 

bsr 

$FC1714 

u2i, 8086- in 68000-Format 

FC10EC 3B400018 

move.w 

D0,24(A5) 

als dspt in bpb eintragen 

FC10F0 302D0014 

move.w 

20(A5),D0 

dnsides 

FC10F4 C1ED0018 

muls.w 

24(A5),D0 

mal dspt 

FC10F8 3B400016 

move.w 

D0,22(A5) 

als dspc in bpb eintragen 
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FC10FC 2EBC000016F6 

move.1 

#$16F6,(A7) 

Puffer+28, Anzahl versteckter Sektoren 

FC1102 61000610 

bsr 

SFC1714 

u2i, 8086- in 68000-Format 

FC1106 3B40001A 

move.w 

D0,26(A5) 

als dhidden in bpb eintragen 

FC110A 2EBC000016ED 

move.1 

#S16ED,(A7) 

Puffer+19, Anzahl Sektoren auf Diskette 

FC1110 61000602 

bsr 

SFC1714 

u2i, 8086- in 68000-Format 

FC1114 48C0 

ext. 1 

DO 


FC1116 81ED0016 

divs.w 

22(A5),D0 

durch spc teilen 

FC111A 3B400012 

move.w 

D0,18(A5) 

als dntracks in bpb eintragen 

FC111E 4247 

clr.w 

D7 

Zähler auf Null 

FC1120 6016 

bra 

SFC1138 

zum Schleifenende 

FC1122 2040 

move.1 

A5,A0 

Zeiger auf bpb 

FC1124 3247 

move.w 

D7,A1 

Zähler 

FC1126 D1C9 

add.l 

Al, AO 

plus Zeiger auf bpb 

FC1128 3247 

move.w 

D7,A1 

Zähler 

FC112A D3FC0000160A 

add. 1 

#$16DA,AI 

Adresse Diskpuffer 

FC1130 1169000800IC 

move.b 

8(A1),28(A0) 

Byte der Serialnummer kopieren 

FC1136 5247 

addq.w 

#1 ,D7 

Zähler erhöhen 

FC1138 BE7C0003 

cmp.w 

#3,D7 

schon auf 3? 

FC113C 60E4 

blt 

SFC1122 

nein, zum Schleifenstart 

FC113E 207C000009FA 

move.1 

#49FA,AO 

cdev 

FC1144 326E0008 

move.w 

8(A6),A1 

Drive-Nummer 

FC1148 D1C9 

add.l 

Al ,A0 


FC114A 227C000009F8 

move.1 

«9F8.A1 

wpstatus 

FC1150 346E0008 

move.w 

8(A6),A2 

Drive-Nummer 

FC1154 D3CA 

add.l 

A2,A1 


FC1156 1091 

move.b 

(AI),(AO) 

Write Protect Status übernehmen 

FC1158 6704 

beq 

SFC115E 


FC115A 7001 

moveq.1 

#1,00 

Diskettenstatus unsicher 

FC115C 6002 

bra 

SFC1160 


FC115E 4240 

clr.w 

DO 


FC1160 227C0000755A 

move.1 

#$755A,A1 

Adresse dsb 

FC1166 346E0008 

move.w 

8(A6),A2 

Drive-Nummer 

FC116A D3CA 

add. 1 

A2.A1 


FC116C 1280 

move.b 

DO,(AI) 

Status merken 

FC116E 2000 

move.1 

A5,D0 

Zeiger auf bpb als Ergebnis 

FC1170 4A9F 

tst.l 

(A7)+ 


FC 1172 4CDF30C0 

movem.1 

(A7)+,D6-D7/A4-A5 

Register zurückholen 

FC1176 4E5E 

unlk 

A6 


FC1178 4E75 

rts 






'** mediach, Diskette gewechselt? 

FC117A 4E560000 

link 

A6,#0 


FC117E 48E70304 

movem.1 

D6-D7/A5,•(A7) 

Register retten 

FC1182 0C6E00020008 

cmp.w 

#2,8(A6) 

Drive-Nurrtner < 2? 

FC1188 6004 

blt 

SFC118E 

j a 

FC118A 70F1 

moveq.1 

#-15,D0 

•unknown device' 

FC118C 604C 

bra 

SFC11DA 

Fehleraussprung 

FC118E 3E2E0008 

move.w 

8(A6),D7 

Drive-Nummer 

FC1192 3A47 

move.w 

D7,A5 


FC 1194 DBFC0000755A 

add.l 

#S755A,A5 

plus Adresse dsb 

FC119A 0C150002 

cmp.b 

#2,(A5) 

media changed? 

FC119E 6604 

bne 

SFC11A4 

nein 

FC11AO 7002 

moveq.1 

#2, DO 

media changed, Diskette wurde gewechselt 

FC11A2 6036 

bra 

$FC1IDA 

zum Funktionsende 

FC11A4 207C000009FA 

move.1 

#$9FA,A0 

wplatch 

FC 11AA 4A307000 

tst.b 

(A0.D7.W) 

für Drive testen 

FC11AE 6704 

beq 

SFC11B4 

ok? 

FC11B0 1ABC0001 

move.b 

#1,(A5) 

Status unsicher 

FC11B4 2039000004BA 

move.1 

S4BA,D0 

_hz_200 Zähler 

FC11BA 3247 

move.w 

D7,A1 

Drive-Nummer 

FC11BC D3C9 

add. 1 

AI,AI 


FC11 BE D3C9 

add.l 

AI,AI 

als Langwortindex 

FC11C0 D3FC000009FC 

add.l 

#S9FC,Al 

acctim, letzte Zugriffszeit 

FC11C6 2211 

move.1 

(AI),Dl 

holen 

FC11C8 9081 

sub. 1 

Dl,DO 

von aktueller Zeit abziehen 

FC11CA B0B900002A46 

cmp. 1 

S2A46,D0 

mit maxacctim vergleichen 

FC11D0 6C04 

bge 

SFC11D6 

noch kleiner? 

FC11D2 4240 

clr.w 

DO 

ok, Diskette wurde nicht gewechselt 

FC11D4 6004 

bra 

SFC11DA 

zum Funktionsende 
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FC11D6 1015 

move.b 

(A5),00 

Ergebnis aus wplatch holen 

FC11D8 4880 

ext.u 

DO 


FC11DA 4A9F 

tst.l 

(A7)+ 


FC11DC 4CDF2080 

movem.1 

(A7)+,D7/A5 

Register zurückholen 

FC11E0 4E5E 

unlk 

A6 


FC11E2 4E75 

rts 



*************************************************************** 

Test auf Diskettenwechsel 

FC11E4 4E560000 

link 

A6,#0 


FC11E8 48E70F04 

movem.1 

D4-D7/A5,*(A7) 

Register retten 

FC11EC 3C2E0008 

move.w 

8(A6),D6 

Drive-Nummer 

FC11F0 3006 

move.u 

D6,D0 


FC11F2 EB40 

asl .w 

#5, DO 

mal 32 

FC11F4 48C0 

ext.l 

DO 


FC11F6 2A40 

move.1 

D0,A5 


FC11F8 0BFC00007570 

add.l 

«7570,A5 

plus Adresse bpb 

FC11FE 3E86 

move.u 

D6,(A7) 

Drive-Ninrner 

FC1200 6100FF78 

bsr 

IFC117A 

media change testen 

FC1204 3E00 

move.w 

D0,D7 

und merken 

FC1206 BE7C0002 

cmp.w 

#2,D7 

Diskette sicher gewechselt? 

FC120A 660A 

bne 

SFC1216 

nein 

FC120C 3007 

move.w 

D7,D0 

Wechsel-Status 

FC120E 6000009C 

bra 

SFC12AC 

als Ergebnis 

FC 1212 60000096 

bra 

SFC12AA 

nicht gewechselt als Ergebnis 

FC1216 BE7C0001 

cmp.w 

#1 ,D7 

eventuell gewechselt? 

FC121A 6600008E 

bne 

SFC12AA 

nein 

FC121E 3EBC0001 

move.w 

#1,(A7) 

ein Sektor lesen 

FC1222 4267 

clr.w 

* (A7) 

Seite 0 

FC1224 4267 

clr.w 

* (A7) 

Track 0 

FC1226 3F3C0001 

move.w 

#1,-<A7) 

Sektor 1 (Bootsektor) 

FC122A 3F06 

move.w 

D6,•(A7) 

Drive-Nummer 

FC122C 42A7 

ctr.l 

(A 7) 

Filler 

FC122E 2F3C000016DA 

move.1 

«160A,-(A7) 

Adresse Diskpuffer 

FC1234 4EB900FC1782 

jsr 

SFC1782 

floprd, Sektor lesen 

FC123A DFFC00000010 

add.l 

«10,A7 

Stackpointer korrigieren 

FC1240 2A00 

move.1 

DO,05 

Fehlernummer merken 

FC1242 4A85 

tst.l 

D5 

ok? 

FC1244 6C10 

bge 

SFC1256 

ja 

FC1246 3E86 

move.w 

D6,(A7) 

Drive-Nummer 

FC1248 2005 

move.1 

D5,D0 

Fehlernummer 

FC124A 3F00 

move.w 

DO,•(A7) 

als Parameter 

FC124C 4EB900FC07E8 

jsr 

SFC07E8 

an critical error handler übergeben 

FC1252 548F 

addq.1 

#2,A7 

Stackpointer korrigieren 

FC1254 2A00 

move.1 

D0,D5 

Fehlernummer 

FC1256 BA8C00010000 

cmp. 1 

«10000,D5 

Retry? 

FC125C 67C0 

beq 

SFC121E 

ja, nochmal versuchen 

FC125E 4A85 

tst.l 

D5 

Fehlercode 

FC1260 6C04 

bge 

SFC1266 

ok? 

FC1262 2005 

move.1 

05, DO 

sonst mit Fehlercode 

FC1264 6046 

bra 

SFC12AC 

zum Fehleraussprung 

FC1266 4247 

clr.w 

07 

Zähler löschen 

FC1268 601C 

bra 

SFC1286 


FC126A 207C000016DA 

move.1 

«16DA.A0 

Adresse Diskpuffer 

FC1270 10307008 

move.b 

8(A0,D7.w),D0 

Serialnummer 

FC1274 4880 

ext.w 

DO 


FC1276 1235701C 

move.b 

28{A5.D7.w),Dl 

alten Wert holen 

FC127A 4881 

ext.w 

Dl 


FC127C B041 

cmp.w 

Dl,DO 

Übereinstimmung? 

FC127E 6704 

beq 

SFC1284 

ja 

FC1280 7002 

moveq.l 

#2,00 

'media changed' 

FC1282 6028 

bra 

SFC12AC 

zum Aussprung 

FC1284 5247 

addq.w 

#1 ,D7 

Zähler erhöhen 

FC1286 BE7C0003 

cmp.w 

#3,07 

schon 3 Bytes getestet? 

FC128A 60DE 

blt 

SFC126A 

nein, nächstes Byte 

FC128C 3046 

move.w 

D6.A0 

Drive-Nummer 

FC128E 01FC000009FA 

add.l 

«9FA,A0 

wplatch 

FC1294 3246 

move.w 

06,AI 

Drive-Nummer 

FC1296 D3FC000009F8 

add.l 

«9F8.A1 

wpstatus 

FC129C 1091 

move.b 

CA1),(A0) 

wpstatus in wplatch übernehmen 
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FC129E 660A 

bne 

SFC12AA 


FC12A0 3046 

move.w 

06, A0 

Drive-Nummer 

FC12A2 DlFC0000755A 

add.l 

#$755A,A0 

plus Adresse dsb 

FC12A8 4210 

clr.b 

(A0) 

media change Eintrag löschen 

FC12AA 4240 

clr.w 

DO 

ok 

FC12AC 4A9F 

tst.t 

(A7)+ 


FC12AE 4CDF20E0 

movem.1 

(A7)+,D5-D7/A5 

Register zurückholen 

FC12B2 4E5E 

unlk 

A6 


FC12B4 4E75 

rts 



************************* 

************************************** 

rwabs, Sektor(en) lesen/schreiben 

FC12B6 4E560000 

l ink 

A6,#0 


FC12BA 48E70700 

movem. 1 

05-07,-<A7) 

Register retten 

FC12BE 3E2E0012 

move.w 

18(A6),D7 

Drive-Nummer 

FC12C2 3007 

move.w 

07,00 


FC12C4 B07C0002 

cmp.w 

#2, DO 

kleiner 2? 

FC12C8 6006 

blt 

$FC12D0 

ja 

FC12CA 70F1 

moveq.1 

#-15,DO 

•unkwon device' 

FC12CC 60000068 

bra 

SFC1336 

Fehleraussprung 

FC12D0 4A79000004A6 

tst.w 

S4A6 

_nflops, Floppi es angeschlossen? 

FC12D6 6604 

bne 

SFC12DC 

ja 

FC12D8 70FE 

moveq.1 

#-2,D0 

'Drive not ready' 

FC12DA 605A 

bra 

SFC1336 

Fehleraussprung 

FC12DC 4AAE000A 

tst. 1 

10(A6) 

Ziel/Quell-Buffer 

FC12E0 6616 

bne 

SFC12F8 

Adresse angegeben? 

FC12E2 302E000E 

move.w 

14(A6),D0 

Anzahl Sektoren 

FC12E6 227C0000755A 

move.1 

#$755A,A1 

Adresse dsb 

FC12EC 346E0012 

move.w 

18(A6),A2 

Drive-Nummer 

FC12F0 D3CA 

add.l 

A2,A1 

plus Adresse dsb 

FC12F2 1280 

move.b 

DO,(AI) 

Anzahl Sektoren in dsb 

FC12F4 4280 

clr.l 

00 

ok 

FC12F6 603E 

bra 

SFC1336 

Fehleraussprung 

FC12F8 0C6E00020008 

cmp.w 

#2,8(A6) 

rwflag, media change ignorieren 

FC12FE 6C1C 

bge 

SFC131C 

ja 

FC1300 3E87 

move.w 

07,(A7) 

Drive-Nummer 

FC1302 6100FEE0 

bsr 

SFC11E4 

wurde Diskette gewechselt? 

FC1306 48C0 

ext.l 

DO 


FC1308 2C00 

move.1 

D0,D6 

Status merken 

FC130A 4A86 

tst.l 

D6 

Diskette gewechselt? 

FC130C 670E 

beq 

SFC131C 

nein 

FC130E BCBC00000002 

cmp. 1 

#2,D6 

Diskette sicher gewechselt? 

FC1314 6602 

bne 

SFC1318 

nein 

FC1316 7CF2 

moveq.1 

#-14,D6 

•media changed' 

FC1318 2006 

move.1 

D6,D0 

Change Status 

FC131A 601A 

bra 

SFC1336 

Fehleraussprung 

FC131C 3EAE000E 

move.w 

14(A6),(A7) 

count, Anzahl Sektoren 

FC1320 3F07 

move.w 

D7,-(A7) 

Drive-Nummer 

FC1322 3F2E0010 

move.w 

16(A6),-(A7) 

recno, erste Sektornummer 

FC1326 2F2E000A 

move.1 

10(A6),-(A7) 

buffer 

FC132A 3F2E0008 

move.w 

8(A6),-(A7) 

rwflag, lesen/schreiben 

FC132E 6110 

bsr 

SFC1340 

floprw 

FC1330 DFFCOOOOOOOA 

add.l 

#$A,A7 

Stackpointer korrigieren 

FC1336 4A9F 

tst.l 

(A7)+ 


FC1338 4CDF00C0 

movem.1 

(A7)+,D6-D7 

Register zurückholen 

FC133C 4E5E 

unlk 

A6 


FC133E 4E75 

rts 



*************************************** 

************************ 

floprw, Sektor(en) lesen/schreiben 

FC1340 4E56FFFA 

link 

A6,#-6 


FC1344 48E73F04 

movem.1 

D2-D7/A5,-(A7) 

Register retten 

FC1348 302E0010 

move.w 

16(A6),D0 

Drive-Nummer 

FC134C EB40 

asl .w 

#5,DO 

mal 32 

FC134E 48C0 

ext.l 

DO 


FC1350 2A40 

move.1 

D0,A5 


FC1352 DBFC00007570 

add. 1 

#$7570,A5 

plus Adresse dsb 

FC1358 082E0000000D 

btst 

#0,13(A6) 

Pufferadresse ungerade? 

FC135E 6604 

bne 

SFC1364 

ja 

FC1360 4240 

clr.w 

DO 

oddflag löschen 

FC1362 6002 

bra 

SFC1366 


PCI364 7001 

moveq.1 

#1,00 

oddflag setzen 
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FC1366 3D40FFFE 

move.w 

00,*2(A6) 

und merken 

FC136A 4A6D0016 

tst.w 

22CA5) 

dspc gesetzt? 

FC136E 660A 

bne 

SFC137A 

ja 

FC1370 7009 

moveq.1 

#9,011 

sonst 9 annehmen 

FC1372 3B400016 

move.w 

DO,22 < A5) 

als dspt 

FC1376 3B400018 

move.w 

D0,24(A5> 

und dspc 

FC137A 60000180 

bra 

SFC14FC 

ans Schleifenende 

FC137E 4A6EFFFE 

tst.w 

•2(A6) 

oddflag gesetzt? 

FC1382 6708 

beq 

1FC138C 

nein 

FC1384 203C000016DA 

move.1 

#$160A,00 

Adresse Diskpuffer 

FC138A 6004 

bra 

SFC1390 


FC138C 202E000A 

move.1 

10(A6),00 

Pufferadresse holen 

FC1390 2D40FFFA 

move.1 

00,-6(A6) 

und merken 

FC1394 3C2E000E 

move.w 

14(A6),D6 

recno, logische Sektornummer 

FC1398 48C6 

ext.l 

06 


FC139A 8DED0016 

divs.w 

22(A5),D6 

durch dspc ergibt Tracknummer 

FC139E 382E000E 

move.w 

14(A6),D4 

recno, logische Sektornummer 

FC13A2 48C4 

ext.l 

04 


FC13A4 89ED0016 

divs.w 

22(A5),D4 

durch dspc 

FC13A8 4844 

swap 

04 

Rest der Division als Sektornummer 

FC13AA B86D0018 

cmp.w 

24(A5),04 

mit dspt vergleichen 

FC13AE 6C04 

bge 

SFC13B4 

größer gleich? 

FC13B0 4245 

clr.w 

05 

Seite 0 

FC13B2 6006 

bra 

SFC13BA 


FC13B4 7A01 

moveq.1 

#1,D5 

Seite 1 

FC13B6 98600018 

sub.w 

24(A5),04 

dspt abziehen 

FC13BA 4A6EFFFE 

tst.w 

-2<A6) 

oddflag gesetzt? 

FC13BE 6704 

beq 

SFC13C4 

nein 

FC13C0 7601 

moveq.1 

#1,03 

Zähler auf eins setzen 

FC13C2 6018 

bra 

SFC130C 


FC13C4 30200018 

move.w 

24(A5),D0 

dspt 

FC13C8 9044 

sub.w 

04,00 

minus Sektornummer 

FC13CA B06E0012 

cmp.w 

18(A6),D0 

mit Anzahl Sektoren vergleichen 

FC13CE 6C08 

bge 

SFC13D8 

größer gleich? 

FC13D0 36200018 

move.w 

24(A5),D3 

dspt 

FC13D4 9644 

sub.w 

04, D3 

minus Sektornummer gleich Zähler 

FC13D6 6004 

bra 

SFC13DC 


FC13D8 362E0012 

move.w 

18(A6),D3 

Anzahl Sektoren 

FC13DC 5244 

addq.w 

#1,D4 

Sektornummer erhöhen (erste Nummer 

FC13DE 082E00000009 

btst 

#0,9(A6) 

rwflag testen 

FC13E4 67000080 

beq 

SFC1466 

lesen? 

FC13E8 202EFFFA 

move.1 

-6(A6),D0 

Pufferzeiger 

FC13EC B0AE000A 

cmp. 1 

10(A6),D0 

gleich angegebene Pufferadresse? 

FC13F0 6710 

beq 

SFC1402 

ja 

FC13F2 2EAEFFFA 

move.1 

-6(A6),(A7) 

Quelladresse 

FC13F6 2F2E000A 

move.1 

10(A6),-(A7) 

Zieladresse 

FC13FA 4EB900FC0C0C 

jsr 

SFC0C0C 

Fastcopy, einen Sektor kopieren 

FC1400 588F 

addq.1 

#4,A7 

Stackpointer korrigieren 

FC1402 3E83 

move.w 

D3,(A7) 

Anzahl Sektoren 

FC1404 3F05 

move.w 

05,*(A7) 

Seite 

FC1406 3F06 

move.w 

06,•(A7) 

Track 

FC1408 3F04 

move.w 

D4,-(A7) 

Sektor 

FC140A 3F2E0010 

move.w 

16(A6),*(A7) 

Drive 

FC140E 42A7 

clr.l 

*<A7) 

Filler 

FC1410 2F2EFFFA 

move.l 

-6(A6),-(A7) 

Puffer 

FC1414 4EB900FC1858 

jsr 

$FC1858 

flopwr, Sektor(en) schreiben 

FC141A DFFC00000010 

add.l 

#S10,A7 

Stackpointer korrigieren 

FC1420 2E00 

move.1 

00,07 

Fehlercode 

FC1422 4A87 

tst.l 

D7 

ok? 

FC1424 663E 

bne 

SFC1464 

nein 

FC1426 4A7900000444 

tst.w 

$444 

_fverify, verifizieren 

FC142C 6736 

beq 

SFC1464 

nein 

FC142E 3E83 

move.w 

D3,(A7) 

Anzahl Sektoren 

FC1430 3F05 

move.w 

D5,*(A7) 

Seite 

FC1432 3F06 

move.w 

D6,•(A7) 

Track 

FC1434 3F04 

move.w 

D4,•(A7) 

Sektor 

FC1436 3F2E0010 

move.w 

16(A6),-(A7) 

Drive 

FC143A 42A7 

clr.l 

*(A7) 

Filler 
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FC143C 2F3C000016DA 

move.1 

#$16DA,-(A7) 

Puffer 

FC1442 4EB900FC1AE2 

jsr 

SFC1AE2 

flopver, Sektoren verifizieren 

FC1448 DFFC00000010 

add. 1 

#$10,A7 

Stackpointer korrigieren 

FC144E 2E00 

move.1 

D0.D7 

Fehlercode 

FC1450 4A87 

tst.l 

07 

ok? 

FC1452 6610 

bne 

SFC1464 

nein 

FC1454 2EBC000016DA 

move.1 

#$160A,(A7) 

Adresse Diskpuffer 

FC145A 610002B8 

bsr 

SFC1714 

u2i, 8086- in 68000-Format wandeln 

FC145E 4A40 

tst.w 

DO 

Bad sector list 

FC1460 6702 

beq 

SFC1464 

keine Fehler beim Verifzieren? 

FC1462 7EF0 

moveq.1 

#-16,D7 

'bad sectors' 

FC1464 603A 

bra 

SFC14A0 

Fehleraussprung 

FC1466 3E83 

move.w 

D3,(A7) 

Anzahl Sektoren 

FC1468 3F05 

move.w 

05,-(A7) 

Sei te 

FC146A 3F06 

move.w 

D6,-(A7> 

Track 

FC146C 3F04 

move.w 

04,-(A7) 

Sektor 

FC146E 3F2E0010 

move.w 

16(A6),-(A7) 

Drive 

FC1472 42A7 

clr.l 

-(A7) 

Filler 

FC1474 2F2EFFFA 

move.1 

-6<A6),-(A7) 

Puffer 

FC1478 4EB900FC1782 

jsr 

SFC1782 

floprd, Sektor(en) lesen 

FC147E DFFC00000010 

add. 1 

#$10,A7 

Stackpointer korrigieren 

FC1484 2E00 

move.1 

00,D7 

Fehlercode 

FC1486 202EFFFA 

move.1 

-6 (A6),00 

benutzter Puffer 

FC148A B0AE000A 

cmp. 1 

10(A6),DO 

gleich gewünschter Puffer? 

FC148E 6710 

beq 

$FC14A0 

ja 

FC1490 2EAE000A 

move.1 

10(A6),(A7) 

Zieladresse 

FC1494 2F2EFFFA 

move.1 

-6(A6),-(A7) 

Quelladresse 

FC1498 4EB900FC0C0C 

jsr 

$FC0C0C 

Fastcopy, Sektor kopieren 

FC149E 588F 

addq.1 

#4,A7 

Stackpointer korrigieren 

FC14A0 4A87 

tst.l 

07 

Fehler? 

FC14A2 6C32 

bge 

$FC14D6 

nein 

FC14A4 3EAE0010 

move.w 

16(A6),(A7) 

Drive-Nummer 

FC14A8 2007 

move.1 

D7,D0 

Fehlercode 

FC14AA 3F00 

move.w 

DO,-(A7) 

als Parameter 

FC14AC 4EB900FC07E8 

jsr 

$FC07E8 

critical error handler 

FC14B2 548F 

addq.1 

#2,A7 

Stackpointer korrigieren 

FC14B4 2E00 

move.1 

00,D7 

Fehlercode merken 

FC14B6 0C6E00020008 

cmp.w 

#2,8(A6) 

rwflag, media change ignorieren? 

FC14BC 6C18 

bge 

$FC1406 

ja 

FC14BE BEBCOOO10000 

cmp. 1 

#$10000,D7 

Retry? 

FC14C4 6610 

bne 

$FC14D6 

nein 

FC14C6 3EAE0010 

move.w 

16(A6),(A7) 

Drive-Nummer 

FC14CA 6100FD 18 

bsr 

$FC11E4 

Diskette gewechselt? 

FC14CE B07C0002 

cmp.w 

#2,00 

definitiv gewechselt? 

FC14D2 6602 

bne 

$FC14D6 

nein 

FC14D4 7EF2 

moveq.1 

#-14,07 

‘media changed' 

FC14D6 BEBC00010000 

cmp. 1 

#$10000,D7 

Retry? 

FC14DC 6700FF00 

beq 

SFC13DE 

ja 

FC14E0 4A87 

tst.l 

07 

Fehler? 

FC14E2 6C04 

bge 

$FC14E8 

nein 

FC14E4 2007 

move.1 

D7,D0 

Fehlercode 

FC14E6 601E 

bra 

$FC1506 

zum Fehleraussprung 

FC14E8 3003 

move.w 

03,00 

Sektorzähler 

FC14EA 48C0 

ext.l 

DO 


FC14EC 7209 

moveq.1 

#9,01 


FC14EE E3A0 

asl. 1 

Dl,DO 

mal 512 

FC14F0 D1AE000A 

add. 1 

DO,10(A6) 

Pufferadresse erhöhen 

FC14F4 D76E000E 

add.w 

D3,14(A6) 

logische Sektornummer plus Sektorzähler 

FC14F8 976E0012 

sub.w 

D3,18(A6) 

Anzahl Sektoren vermindern 

FC14FC 4A6E0012 

tst.w 

18(A6) 

noch Sektoren zu verarbeiten? 

FC1500 6600FE7C 

bne 

$FC137E 

ja 

FC1504 4280 

clr.l 

00 

ok 

FC1506 4A9F 

tst.l 

(A7)+ 


FC1508 4CDF20F8 

movem.1 

lA7)+,D3-07/A5 

Register zurückholen 

FC150C 4E5E 

unlk 

A6 


FC150E 4E75 

rts 
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FC1510 4E56FFFC 

Unk 

A6,#-4 

random, Zufallszahl generieren 

FC1514 4AB900002A4A 

tst.l 

S2A4A 

letzte Zufallszahl 

FC151A 6616 

bne 

SFC1532 

nicht Null? 

FC151C 2039000004BA 

move.1 

S4BA.D0 

_hz_200 

FC1522 7210 

moveq. 1 

#16,01 


FC1524 E3A0 

asl. 1 

Dl, 00 

um 16 nach links schieben 

FC1526 80B9000004BA 

or. 1 

S4BA.D0 

_hz_200 dazu Odern 

FC152C 23C000002A4A 

move.1 

D0,$2A4A 

als Startwert beutzen 

FC1532 2F3CBB40E62D 

move.l 

#3141592621,-(A7) 


FC1538 2F3900002A4A 

move.l 

$2A4A,-(A7) 

letzter Zufallswert 

FC153E 4EB900FC4B82 

jsr 

SFC4B82 

Imul, 32 Bit-Hultiplikation 

FC1544 508F 

addq.1 

#8,A7 

Stackpointer korrigieren 

FC1546 5280 

addq.l 

#1,00 

plus 1 

FC1548 23C000002A4A 

move.l 

D0,$2A4A 

als neuen Startwert 

FC154E 203900002A4A 

move.l 

S2A4A.D0 

Ergebnis 

FC1554 E080 

asr. 1 

#8, DO 

um 8 nach rechts schieben 

FC1556 C0BC00FFFFFF 

and. 1 

#$FFFFFF,D0 

Bits 24-31 löschen 

FC155C 4E5E 

unlk 

A6 


FC155E 4E75 rts 

*************************************************************** 

hdv_boot, Bootsektor laden 

FC1560 4E560000 

link 

A6,#0 


FC1564 48E70300 

movem.1 

D6-D7,-(A7) 

Register retten 

FC1568 4EB900FC0C2E 

jsr 

SFC0C2E 

hdv_init, Drive initialisieren 

FC156E 4A79000004A6 

tst.w 

$4A6 

_nflops 

FC1574 6704 

beq 

SFC157A 

kein Laufwerk angeschlossen? 

FC1576 7001 

moveq.1 

#1,00 

•couldn't load' 

FC1578 6002 

bra 

SFC157C 


FC157A 7002 

moveq.1 

#2, DO 

•no drive' 

FC157C 3E00 

move.w 

D0,D7 

Fehler merken 

FC157E 4A79000004A6 

tst.w 

$4A6 

nflops 

FC1584 6744 

beq 

SFC15CA 

kein Laufwerk? 

FC1586 0C79000200000446 

cmp.w 

#2,$446 

_bootdev 

FC158E 6C3A 

bge 

SFC15CA 

kein Diskette? 

FC1590 3EBC0001 

move.w 

#1,(A7) 

ein Sektor 

FC1594 4267 

clr.w 

* (A7) 

Seite 0 

FC1596 4267 

clr.w 

*(A7) 

Track 0 

FC1598 3F3C0001 

move.w 

#1,•(A7) 

Sektor 1 

FC159C 3F3900000446 

move.w 

$446,-<A7) 

_bootdev 

FC15A2 42A7 

clr.l 

(A 7) 

Filler 

FC15A4 2F3C0000160A 

move.l 

#$160A,•(A7) 

Adresse Diskpuffer 

FC15AA 4EB900FC1782 

jsr 

$FC1782 

fl oprd, Sektor lesen 

FC15B0 DFFC00000010 

add. 1 

#$10,A7 

Stackpointer korrigieren 

FC15B6 4A80 

tst.l 

DO 

Fehler? 

FC15B8 6604 

bne 

$FC15BE 

ja 

FC15BA 4247 

clr.w 

D7 

Fehlercode löschen 

FC15BC 600C 

bra 

$FC15CA 


FC15BE 4A39000009F8 

tst.b 

$9F8 

wpstatus 

FC15C4 6604 

bne 

$FC15CA 


FC15C6 7003 

moveq.1 

#3,00 

•unreadable' 

FC15C8 6024 

bra 

$FC15EE 

zum Funktionsende 

FC15CA 4A47 

tst.w 

D7 

Fehler? 

FC15CC 6704 

beq 

$FC1502 

nein 

FC15CE 3007 

move.w 

07,00 

Fehlercode holen 

FC15D0 601C 

bra 

$FC1SEE 

zum Funktionsende 

FC 1502 3EBC0100 

move.w 

#$100,(A7) 

$100 Worte 

FC15D6 2F3C0000160A 

move.l 

#$160A,•(A7) 

Adresse Diskpuffer 

FC150C 61000106 

bsr 

$FC16E4 

Checksurmie berechnen 

FC15E0 588F 

addq.l 

#4,A7 

Stackpointer korrigieren 

FC15E2 B07C1234 

cmp.w 

#$1234,DO 

magic für Bootsektor? 

FC15E6 6604 

bne 

$FC15EC 

nein 

FC15E8 4240 

clr.w 

DO 

ok 

FC15EA 6002 

bra 

$FC15EE 

zum Funktionsende 

FC15EC 7004 

moveq.1 

#4,00 

'not valid boot sector' 

FC 1 SEE 4A9F 

tst.l 

<A7)+ 


FC15F0 4CDF0080 

movem.1 

<A7)+,D7 

Register zuruckholen 

FC15F4 4E5E 

unlk 

A6 


FC15F6 4E75 

rts 
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*************************************************************** proto bt, Bootsektor generieren 


FC15F8 4E56FFFA 

link 

A6,#-6 


FC15FC 48E70704 

movem.1 

D5-D7/A5,-(A7) 

Register retten 

FC1600 4A6E0012 

tst.w 

18(A6) 

execflag testen , 

FC1604 6C1E 

bge 

SFC1624 

Ausführbarkeit beibehalten 

FC1606 3EBC0100 

move.w 

«100, (A7) 

$100 Worte 

FC160A 2F2E0008 

move.1 

8(A6),-(A7) 

Adresse des Sektorpuffers 

FC160E 61000004 

bsr 

SFC16E4 

Checksuime berechnen 

FC1612 588F 

addq.1 

#4,A 7 

Stackpointer korrigieren 

FC1614 B07C1234 

cmp.w 

«1234,00 

magic für Bootsektor? 

FC1618 6704 

beq 

SFC161E 

ja 

FC161A 4240 

clr.w 

DO 

nicht ausführbar 

FC161C 6002 

bra 

SFC1620 


FC161E 7001 

moveq.1 

#1,00 

ausführbar 

FC1620 3D400012 

move.w 

DO,18(A6) 

execflag merken 

FC1624 4AAE000C 

tst.l 

12CA6) 

Serialnummer 

FC1628 603E 

blt 

SFC1668 

negativ, nicht ändern 

FC162A 202E000C 

move.l 

12(A6),D0 

Serialnurmer 

FC162E B0BC00FFFFFF 

cmp. 1 

«FFFFFF.D0 

> SFFFFFF? 

FC1634 6F08 

ble 

SFC163E 

nein 

FC1636 6100FED8 

bsr 

SFC1510 

rand, Zufallszahl erzeugen 

FC163A 2D40000C 

move.1 

00,12(A6) 

als Serialnummer 

FC163E 4247 

clr.w 

D7 

Zähler löschen 

FC1640 6020 

bra 

SFC1662 

zum Schleifenende 

FC1642 202E000C 

move.1 

12(A6),D0 

SeriaInummer 

FC1646 C0BC000000FF 

and. 1 

«FF,DO 

Bit 0-7 

FC164C 3247 

move.w 

D7,A1 

Zeiger auf nächstes Byte im Puffer 

FC164E D3EE0008 

add.l 

8(A6),A1 

plus Pufferadresse 

FC1652 13400008 

move.b 

D0,8(A1) 

Byte der Serialnunner in Puffer 

FC1656 202E000C 

move.1 

12(A6),D0 

Serialnunner 

FC165A E080 

asr.l 

#8,DO 

un 8 nach rechts schieben 

FC165C 2D40000C 

move.1 

DO,12(A6) 

und wieder merken 

FC1660 5247 

addq.w 

#1 ,D7 

Zähler erhöhen 

FC1662 BE7C0003 

cmp.w 

#3,D7 

schon 3 erreicht? 

FC1666 6DDA 

blt 

SFC1642 

nein 

FC1668 4A6E0010 

tst.w 

16(A6) 

Diskettengröße 

FC166C 6028 

blt 

SFC1696 

negativ, nicht ändern 

FC166E 3C2E0010 

move.w 

16(A6),D6 

Diskettengröße 

FC1672 CDFC0013 

muls.w 

«13,D6 

mal 19 gleich Zeiger auf Prototyp bpb 

FC1676 4247 

clr.w 

D7 

Zähler löschen 

FC1678 6016 

bra 

SFC1690 

zum Schleifenende 

FC167A 3047 

move.w 

07,A0 

Zähler 

FC167C D1EE0008 

add.l 

8(A6),A0 

plus Pufferadresse 

FC1680 3246 

move.w 

D6,A1 

Diskettengröße 

FC1682 D3FC00FD2F8C 

add.l 

«FD2F8C.A1 

plus Adresse des Prototyp bpb 

FC1688 1151000B 

move.b 

(AI),11(A0) 

bpb kopieren 

FC168C 5246 

addq.w 

#1 ,D6 


FC168E 5247 

addq.w 

#1 ,D7 

Zähler erhöhen 

FC1690 BE7C0013 

cmp.w 

«13,D7 

schon 19? 

FC1694 6DE4 

blt 

SFC167A 

nein 

FC1696 426EFFFA 

clr.w 

-6(A6) 


FC169A 2D6E0008FFFC 

move.1 

8(A6),-4(A6) 

Pufferadresse 

FC16A0 600E 

bra 

SFC16B0 


FC16A2 206EFFFC 

move.1 

-4<A6),A0 

Pufferadresse 

FC16A6 3010 

move.w 

(A0),D0 

Wort aus Puffer holen 

FC16A8 D16EFFFA 

add.w 

DO,-6(A6) 

zur ChecksurmenbiIdung addieren 

FC16AC 54AEFFFC 

addq.1 

#2,-4(A6) 

nächstes Wort 

FC16B0 202E0008 

move.1 

8(A6),D0 

Pufferadresse 

FC16B4 D0BC000001FE 

add.l 

«1FE,D0 

plus $1 FE 

FC16BA BOAEFFFC 

cmp. 1 

-4(A6),D0 

schon letztes Wort? 

FC16BE 62E2 

bhi 

SFC16A2 

nein 

FC16C0 303C1234 

move.w 

«1234,DO 

Checksumme für Bootsektor 

FC16C4 906EFFFA 

sub.w 

-6(A6),D0 

vom bisherigen Wert abziehen 

FC16C8 226EFFFC 

move.1 

-4(A6),A1 


FC16CC 3280 

move.w 

DO,(AI) 

Checksuime in Puffer 

FC16CE 4A6E0012 

tst.w 

18(A6) 

execflag 

FC1602 6606 

brve 

SFC160A 

Bootsektor ausführbar? 

FC1604 206EFFFC 

move.1 

-4(A6),A0 
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FC16D8 5250 

FC16DA 4A9F 

FC160C 4CDF20C0 

FC16E0 4E5E 

FC16E2 4E75 

addq.w 
tst. 1 
movem.1 

unlk 

rts 

#1,(AO) 

(A7)+ 

(A7)+,D6-D7/A5 

A6 

Checksumme erhöhen, nicht nusführbor 

Register zurückholcn 

Checksumme berechnen 

FC16E4 4E560000 

t ink 

A6,#0 

FC16E8 48E70300 

movem.1 

D6-D7,•(A7) 

Register retten 

FC16EC 4247 

clr.w 

D7 

Summe löschen 

FC16EE 600C 

bra 

SFC16FC 

zum Schleifenende 

FC16F0 206E0008 

move.1 

8(A6),A0 

Puffer-Adresse 

FC16F4 3010 

move.w 

(A0),D0 

Wort aus Puffer holen 

FC16F6 DE40 

add.w 

00,07 

summieren 

FC16F8 54AE0008 

addq.1 

#2,8(A6) 

Pufferzeiger erhöhen 

FC16FC 3O2E000C 

move.w 

12(A6),D0 

Anzahl der Worte 

FC 1700 536E000C 

subq.w 

#1,12(A6) 

minus 1 

FC1704 4A40 

tst.w 

00 

schon alle Worte addiert? 

FC1706 66E8 

bne 

SFC16F0 

nein 

FC1708 3007 

move.w 

D7,D0 

Ergebnis nach DO 

FC170A 4A9F 

tst.l 

(A7)+ 


FC170C 4CDF0080 

movem.1 

(A7)+,D7 

Register zurückholen 

FC1710 4E5E 

unlk 

A6 


FC1712 4E75 

rts 


u2i, 8086-Format in 68000-Format 

FC1714 4E56FFFC 

l ink 

A6,#-4 

FC1718. 206E0008 

move.1 

8(A6),A0 

Adresse der Zahl 

FC171C 10280001 

move.b 

1(AO),DO 

Hi-Byte holen 

FC1720 4880 

ext.w 

DO 


FC1722 C07C00FF 

and.w 

#SFF,D0 

Bit 0-7 isolieren 

FC1726 E140 

asl .w 

#8, DO 

nach Bit 8-15 

FC1728 226E0008 

move.1 

8<A6),A1 

Adresse der Zahl 

FC172C 1211 

move.b 

(AI),Dl 

Lo-Byte holen 

FC172E 4881 

ext.w 

Dl 


FC1730 C27C00FF 

and.w 

«FF,Dl 

Bit 0-7 isolieren 

FC1734 8041 

or.w 

Dl,DO 

Lo- und Hi-Byte zusammen Odern 

FC1736 4E5E 

unlk 

A6 


FC1738 4E75 rts 

*************************************************************** 

flopini, Laufwerk initialisieren 

FC173A 43F900000A4C 

lea 

$A4C,Al 

Adresse dsbO 

FC1740 4A6F000C 

tst.w 

12(A7) 

Drive A? 

FC1744 6706 

beq 

SFC174C 

ja 

FC1746 43F900000A50 

lea 

$A50,Al 

sonst Adresse dsbl 

FC174C 3379000004400002 

move.w 

S440,2(A1) 

seekrate in dsb 

FC1754 70FF 

moveq.1 

#-1,D0 

Default Fehlernummer 

FC 1756 42690000 

clr.w 

(AI) 

Track-Nummer auf Null 

FC175A 610004EC 

bsr 

SFC1C48 

floplock, Parameter setzen 

FC175E 610006B4 

bsr 

SFC1E14 

select, Laufwerk und Seite selektieren 

FC1762 337CFF000000 

move.w 

#$FF00,(Al) 

Track-Nummer negativ, ungültig 

FC1768 61000636 

bsr 

SFC1DA0 

restore, Track Null suchen 

FC176C 670C 

beq 

SFC177A 

ok, flopok 

FC176E 7E0A 

moveq.1 

#10,D7 

Track 10 

FC1770 610005BC 

bsr 

SFC1D2E 

hseek, Track suchen 

FC1774 6608 

bne 

SFC177E 

Fehler, flopfail 

FC1776 61000628 

bsr 

SFC1DA0 

restore 

FC177A 6700055E 

beq 

$FC1CDA 

ok, flopok 

FC177E 6000054C 

bra 

SFC1CCC 

flopfail 

floprd, Sektor(en) von Diskette lesen 
change, Test auf Diskettenwechsel 

FC1782 6100073A 

bsr 

SFC1EBE 

FC1786 70F5 

moveq.1 

#-11,DO 

Lesefehler als Fehlernummer 

FC1788 610004BE 

bsr 

SFC1C48 

floplock, Parameter setzen 

FC178C 61000686 

bsr 

SFC1E14 

select, Drive und Seite selektieren 

FC1790 610005E8 

bsr 

SFC1D7A 

go2track, Track suchen 

FC1794 66000088 

bne 

SFC181E 

bei Fehler nochmal versuchen 

FC1798 33FCFFFF00000A26 

move.w 

#-1,SA26 

allgemeiner Fehler 

FC17A0 3CBC0090 

move.w 

#$90,(A6) 


FC17A4 3CBC0190 

move.w 

#$190,(A6) 

DMA-Status löschen, Lesen selektieren 

FC17A8 3CBC0090 

move.w 

#$90,(A6) 
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FC17AC 33FC0001FFF FÖ604 

move.w 

#1,$FFFF8604 

Sektorzähler auf eins 

FC17B4 3CBC0080 

move.w 

#$80,(A6) 

1772 selektieren 

FC17B8 3E3C0080 

move.w 

#$80,07 

Read-Befehl, Sektor lesen 

FC17BC 61000602 

bsr 

SFC1E90 

wdiskctl, 07 an 1772 übergeben 

FC17C0 2E3C00040000 

move.1 

#$40000,07 

Timeout-Zähl er 

FC17C6 08390005FFFFFA01 

btst 

#5,$FFFFFA01 

MFP gpip, 1772 fertig? 

FC17CE 6710 

beq 

$FC17E0 

ja 

FC17D0 5387 

subq.1 

#1,07 

Zähler dekrementieren 

FC17D2 66F2 

bne 

$FC17C6 

noch nicht abgelaufen? 

FC17D4 3B7CFFFE0A26 

move.w 

#-2,$A26(A5) 

Drive not Ready 

FC17DA 6100061E 

bsr 

$FC1DFA 

reset, Übertragung beenden 

FC17DE 603E 

bra 

SFC181E 


FC17E0 3CBC0090 

move.w 

#$90,(A6) 

DMA Statusregister selektieren 

FC17E4 3016 

move.w 

<A6),D0 

Status lesen 

FC17E6 08000000 

btst 

#0,00 

DMA-Error? 

FC17EA 6732 

beq 

$FC181E 

ja, nochmal versuchen 

FC17EC 3CBC0080 

move.w 

#$80,(A6) 

1772 selektieren 

FC17F0 610006B2 

bsr 

$FC1EA4 

rdiskctl, Statusregister lesen 

FC17F4 C03C001C 

and.b 

#$1C,00 

RNF, CRC und Lost Data isolieren 

FC17F8 6622 

bne 

$FC181C 

Fehler? 

FC17FA 3B7C000209F6 

move.w 

#2,$9F6(A5) 

retry count auf 2 

FC1800 526D0A0C 

addq.w 

#1,$A0C(A5) 


FC1804 06AD000002000A12 

add. 1 

#$200,$A12(A5) 

DMA-Adresse auf nächsten Sektor 

FC180C 53600A10 

subq.w 

#1,$A10(A5) 

Sektorzähler dekrementieren 

FC1810 670004C8 

beq 

$FC1CDA 

alle Sektoren gelesen, flopok 

FC1814 61000626 

bsr 

$FC1E3C 


FC1818 6000FF7E 

bra 

$FC1798 

nächster Sektor 

FC181C 6118 

bsr 

$FC1836 

errbits, Fehlernummer bestimmen 

FC181E 0C60000109F6 

cmp.w 

#1,$9F6(A5) 

zweiter Versuch? 

FC1824 6604 

bne 

$FC182A 

nein 

FC1826 6100051E 

bsr 

$FC1D46 

reseek, Home und Seek 

FC182A 536009F6 

subq.w 

#1,$9F6(A5) 

retry count dekrementieren 

FC182E 6A00FF5C 

bpi 

$FC178C 

noch ein Versuch? 

FC1832 60000498 

bra 

$FC1CCC 

flopfail, Fehler 

★★★★fr******************************** 

************************** 

errbits, Floppy-Fehlernummer erzeugen 

FC1836 72F3 

moveq.1 

#■13,Dl 

Diskette schreibgeschützt 

FC1838 08000006 

btst 

#6,00 

Write Protect? 

FC183C 6614 

bne 

$FC1852 

ja 

FC183E 72F8 

moveq.1 

#•8,01 

Sektor nicht gefunden 

FC1840 08000004 

btst 

#4,00 

Record not found? 

FC1844 660C 

bne 

$FC1852 

ja 

FC1846 72FC 

moveq.1 

#-4,01 

CRC Error 

FC1848 08000003 

btst 

#3, DO 

CRC Error? 

FC184C 6604 

bne 

$FC1852 

ja 

FC184E 322D0A24 

move.w 

$A24(A5),D1 

Default Error 

FC1852 3B410A26 

move.w 

D1,$A26(A5) 


FC1856 4E75 

rts 


flopwr, Sektor(en) auf Floppy schreiben 




FC1858 61000664 

bsr 

$F C1EBE 

change, Test auf Diskettenwechsel 

FC185C 70F6 

moveq.1 

#■10,DO 

Schreibfehler als Default Error 

FC185E 610003E8 

bsr 

$FC1C48 

floplock, Parameter setzen 

FC1862 302D0A0C 

move.w 

$A0C(A5),D0 

csect, Sektornummer 1? 

FC1866 5340 

subq.w 

#1 ,D0 


FC 1868 806D0A0A 

or.w 

$A0A(A5),D0 

ctrack, Track-Nummer 0? 

FC186C 806D0A0E 

or.w 

$A0E(A5),D0 

cside, Seite 0? 

FC1870 6606 

bne 

$FC1878 

nein, nicht Bootsektor 

FC1872 7002 

moveq.1 

#2,00 

media change 

FC 1874 61000680 

bsr 

$FC1EF6 

auf 1 unsure 1 setzen 

FC1878 6100059A 

bsr 

$FC1E14 

select, Laufwerk und Seite selektieren 

FC187C 610004FC 

bsr 

$FC1D7A 

go2track, Track suchen 

FC1880 66000084 

bne 

$FC1906 

Fehler, nochmal versuchen 

FC1884 3B7CFFFF0A26 

move.w 

#1,$A26(A5) 

currerr auf Default Error 

FC188A 3CBC0190 

move.w 

#$190,(A6) 


FC188E 3CBC0090 

move.w 

#$90,(A6) 

DMA-Status löschen, auf schreiben 

FC1892 3CBC0190 

move.w 

#$190,(A6) 


FC1896 3E3C0001 

move.w 

#1,07 

ein Sektor 

FC189A 610005F4 

bsr 

$FC1E90 

wdiskctl, D7 an 1772 

FC189E 3CBC0180 

move.w 

#$180,(A6) 

1772 seelktieren 
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FC18A2 3E3C00A0 

n»ve.u 

#$A0,D7 

write sector Befehl 

FC18A6 610005E8 

bsr 

SFC1E90 

wdiskctl, D7 an 1772 

FC18AA 2E3C00040000 

move.1 

#$40000,D7 

Zähler für Timeout 

FC18B0 08390005FFFFFA01 

btst 

#5,$FFFFFA01 

HFP gpip, 1772 fertig? 

FC18B8 670A 

beq 

SFC18C4 

ja 

FC18BA 5387 

subq.l 

#1,07 

Timeout-Zähler dekrementieren 

FC18BC 66F2 

bne 

SFC18B0 

noch nicht abgelaufen? 

FC18BE 6100053A 

bsr 

$FC1DFA 

reset, Übertragung abbrechen 

FC18C2 603A 

bra 

SFC18FE 

nächster Versuch 

FC18C4 3CBC0180 

move.w 

#$180,(A6) 

1772 selektieren 

FC18C8 610005DA 

bsr 

SFC1EA4 

rdiskctl, Statusregister lesen 

FC18CC 6100FF68 

bsr 

$FC1836 

errbits, Fehlernummer berechnen 

FC1800 08000006 

btst 

#6,DO 

write protect? 

FC18D4 660003F6 

bne 

$FC1CCC 

flopfail, kein weiterer Versuch 

FC1808 C03C005C 

and.b 

#$5C,D0 

write protect, RNF, CRC und Lost Data 

FC180C 6620 

bne 

$FC18FE 

Fehler, nochmal versuchen 

FC180E 3B7C000209F6 

move.w 

#2,$9F6(A5) 

retrycnt auf 3 Versuche für nächsten Sektor 

FC18E4 526O0A0C 

addq.w 

#1,$A0C(A5) 

csect, Sektornummer erhöhen 

FC18E8 06AD000002000A12 

add.l 

#$200,$A12(A5) 

cdma, DHA-Adresse auf nächsten Sektor 

FC18F0 53600A10 

subq.w 

#1,$A10(A5) 

ccount, Sektorzähler vermindern 

FC18F4 670003E4 

beq 

$FC1CDA 

alle Sektoren geschrieben, flopok 

FC18F8 61000542 

bsr 

$FC1E3C 

selctl, Sektornummer und DHA-Zeiger 

FC18FC 6086 

bra 

SFC1884 

nächsten Sektor ohne Seek schreiben 

FC18FE 0C6D000109F6 

cmp.w 

#1,$9F6(A5) 

retrycnt, zweiter Versuch? 

FC1904 6604 

bne 

$FC190A 

nein 

FC1906 6100043E 

bsr 

SFC1D46 

reseek, Home und Seek 

FC190A 536009F6 

subq.w 

#1,$9F6(A5) 

retrycnt, Versuchezähler vermindern 

FC190E 6A00FF68 

bpi 

$FC1878 

noch ein Versuch? 

FC1912 600003B8 

bra 

$FC1CCC 

flopfail 




** flopfmt, Track formatieren 

FC1916 0CAF876543210016 

cmp. 1 

#$87654321,22(A7) 

Magic number? 

FC191E 660003AC 

bne 

$FC1CCC 

nein, flopfail 

FC1922 6100059A 

bsr 

$FC1EBE 

change, Test auf Diskettenwechsel 

FC1926 70FF 

moveq.1 

#-1,00 

Default Error Nummer 

FC1928 6100031E 

bsr 

$FC1C48 

floplock, Parameter setzen 

FC192C 610004E6 

bsr 

$FC1E14 

select, Laufwerk und Seite selektieren 

FC1930 3B6F000E0A16 

move.w 

14<A7),$A16(A5) 

spt, Sektoren pro Track 

FC1936 3B6F00140A18 

move.w 

20(A7),$A18(A5) 

interlv, Interleave-Faktor 

FC193C 3B6F001A0A1A 

move.w 

26(A7),$A1A(A5) 

Virgin, Sektordaten beim Formatieren 

FC1942 2B6F00080A1C 

move.1 

8(A7),$A1C(A5) 

sectlist, Liste der Sektornummern 

FC1948 7002 

moveq.1 

#2, DO 

'changed' 

FC194A 610005AA 

bsr 

SFC1EF6 

Diskette gewechselt 

FC194E 610003D8 

bsr 

$FC1D28 

hssek, Track suchen 

FC1952 66000378 

bne 

$F C1CCC 

nicht gefunden, flopfail 

FC1956 336O0A0A0000 

move.w 

$A0A(A5),(A1) 

ctrack, aktuellen Track in dsb schreiben 

FC195C 3B7CFFFF0A26 

move.w 

#•1,$A26(A5) 

allgemeiner Fehler 

FC1962 6128 

bsr 

$FC198C 

fmtrack, Track formatieren 

FC1964 66000366 

bne 

$FC1CCC 

flopfail, Fehler 

FC1968 3B600A160A10 

move.w 

$A16(A5),$A10(A5) 

spt, Sektoren pro Track als ccount 

FC196E 3B7C00010A0C 

move.w 

#1,$A0C(A5) 

csect, Beginn mit Sektor 1 

FC1974 61000188 

bsr 

$FC1AFE 

verify, Beginn mit Sektor 1 

FC1978 24600A12 

move.1 

$A12(A5),A2 

cdma, Liste mit schlechten Sektoren 

FC197C 4A52 

tst.w 

(A2) 

schlechter Sektor? 

FC197E 6700035A 

beq 

$FC1CDA 

nein, flopok 

FC1982 3B7CFFF00A26 

move.w 

#* 16,$A26(A5) 

Bad Sectors 

FC1988 60000342 

bra 

$FC1CCC 

flopfail, Fehler 




** fmtrack, rack formatieren 

FC198C 3B7CFFF60A24 

move.w 

#•10,$A24(A5) 

Schreibfehler 

FC1992 246D0A12 

move.1 

$A12(A5),A2 

cdma, Puffer für Track-Daten 

FC1996 26600A1C 

move.1 

$A1C(A5),A3 

sectlist, Liste der Sektornummern 

FC199A 323C003B 

move.w 

#$3B,D1 

60 mal 

FC199E 103C004E 

move.b 

#$4E,D0 

$4E, Track-Vorspann 

FC19A2 61000136 

bsr 

$FC1ADA 

wmult, in Puffer schreiben 

FC19A6 4243 

clr.w 

D3 


FC19A8 4A6D0A18 

tst.w 

$A18(A5) 

Interleave-Faktor 

FC19AC 6B0000FA 

bmi 

$FC1AA8 

negativ, Sektorliste benutzen 

FC19B0 363C0001 

move.w 

#1,03 

Start bei Sektor eins 

FC19B4 3803 

move.w 

D3,D4 

Sektornummer merken 
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FC19B6 323C000B 

move.w 

#$B,D1 

12 mal 

FC19BA 4200 

clr.b 

DO 

0 

FC19BC 610001IC 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC19C0 323C0002 

move.w 

#2,Dl 

3 mal 

FC19C4 103C00F5 

move.b 

#$F5,D0 

SF5 

FC19C8 61000110 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC19CC 14FC00FE 

move.b 

#$FE,(A2)+ 

SFE, Adreßmarke 

FC1900 14F900000A0B 

move.b 

SA0B,(A2)+ 

Track 

FC19D6 14F900000A0F 

move.b 

SA0F,(A2)+ 

Seite 

FC190C 14C4 

move.b 

D4,(A2)+ 

Sektor 

FC19DE 14FC0002 

move.b 

#2,(A2)+ 

Sektorgröße 512 Bytes 

FC19E2 14FC00F7 

move.b 

#SF7,(A2)+ 

Checksumme schreiben 

FC19E6 323C0015 

move.w 

#$15,Dl 

22 mal 

FC19EA 103C004E 

move.b 

#$4E,D0 

S4E 

FC19EE 610000EA 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC19F2 323C000B 

move.w 

#$8,D1 

12 mal 

FC19F6 4200 

clr.b 

DO 

0 

FC19F8 610000E0 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC19FC 323C0002 

move.w 

#2,01 

3 mal 

FC1A00 103C00F5 

move.b 

#SF5,D0 

SF5 

FC1A04 610000D4 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC1A08 14FC00FB 

move.b 

#$FB,(A2)+ 

SFB, Datenblockmarke 

FC1A0C 323C00FF 

move.w 

#SFF,D1 

256 mal 

FC1A10 14ED0A1A 

move.b 

SA1A(A5),(A2)+ 

Virgin, Initialdaten 

FC1A14 14ED0A1B 

move.b 

SA1B(A5), (A2)+ 


FC1A18 51C9FFF6 

dbra 

Dl,SFC1A10 

nächstes Wort 

FC1A1C 14FC00F7 

move.b 

#$F7,<A2)+ 

Checksumme schreiben 

FC1A20 323C0027 

move.w 

#S27,D1 

40 mal 

FC1A24 103C004E 

move.b 

#S4E,D0 

S4E 

FC1A28 610000B0 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC1A2C 4A6D0A18 

tst.w 

$A18(A5) 

Interleave-Faktor 

FC1A30 6B76 

bmi 

SFC1AA8 

negativ? 

FC1A32 D8600A18 

add.w 

SA18(A5),D4 

interlv addieren, nächster Sektor 

FC1A36 B8600A16 

cmp.w 

SA16(A5),D4 

spt, größte Sektornummer? 

FC1A3A 6F00FF7A 

ble 

SFC19B6 

nein, nächsten Sektor 

FC1A3E 5243 

addq.w 

#1 ,D3 

Startsektor plus eins 

FC1A40 B6600A18 

cmp.w 

SA18(A5),D3 

interlv? 

FC1A44 6F00FF6E 

ble 

SFC19B4 

nächsten Sektor 

FC1A48 323C0578 

move.w 

#$578,Dl 

1401 mal (bis Trackende) 

FC1A4C 103C004E 

move.b 

#$4E,D0 

S4E 

FC1A50 61000088 

bsr 

SFCIADA 

wmult, in Puffer schreiben 

FC1A54 13ED0A15FFFF860D 

move.b 

SA15(A5),SFFFF860D 

dmalow 

FC1A5C 13ED0A14FFFF860B 

move.b 

SA14(A5),SFFFF860B 

dmamid 

FC1A64 13ED0A13FFFF8609 

move.b 

SA13(A5),SFFFF8609 

dmahigh 

FC1A6C 3CBC0190 

move.w 

#$190,(A6) 


FC1A70 3CBC0090 

move.w 

#S90,(A6) 

DMA-Status löschen, write 

FC1A74 3CBC0190 

move.w 

#$190,(A6) 


FC1A78 3E3C001F 

move.w 

#S1F,D7 

Sektorzähler auf 31 

FC1A7C 61000412 

bsr 

SFC1E90 

wdiskctl, D7 an 1772 schicken 

FC1A80 3CBC0180 

move.w 

#S180,(A6) 

1772 selektieren 

FC1A84 3E3C00F0 

move.w 

#SF0,D7 

Format•T rack-Befehl 

FC1A88 61000406 

bsr 

SFC1E90 

wdiskctl, D7 an 1772 schicken 

FC1A8C 2E3C00040000 

move.1 

#$40000,D7 

Timeout-Zähler 

FC1A92 08390005 F FF FFA01 

btst 

#5,$FFFFFA01 

MFP gpip, 1772 fertig? 

FC1A9A 6720 

beq 

SFC1ABC 

ja 

FC1A9C 5387 

subq.1 

#1 ,D7 

Timeout Zähler dekrementieren 

FC1A9E 66F2 

bne 

SFC1A92 

noch nicht abgelaufen? 

FC1AA0 61000358 

bsr 

SFC1DFA 

reset, abbrechen 

FC1AA4 7E01 

moveq.1 

#1 ,D7 

Z-Bit löschen, Fehler 

FC1AA6 4E75 

rts 



FC1AA8 B66D0A16 

cmp.w 

SA16(A5),D3 

spt, größte Sektornummer erreicht? 

FC1AAC 679A 

beq 

SFC1A48 

ja, Ende des Tracks 

FC1AAE 3C03 

move.w 

D3,D6 

aktuelle Sektornummer 

FC1AB0 DC46 

add.w 

D6,D6 

als Wortindex 

FC1AB2 38336000 

move.w 

(A3,D6.w),D4 

Sektornummer aus Sektor liste holen 

FC1AB6 5243 

addq.w 

#1,D3 

Sektorenzähler erhöhen 

FC1AB8 6000FEFC 

bra 

SFC19B6 

Sektordaten in Puffer schreiben 
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FC1ABC 3CBC0190 

move.w 

#$190,(A6) 

DMA-Status selektieren 

FC1AC0 3016 

move.w 

(A6),D0 

Status lesen 

FC1AC2 08000000 

btst 

#0,D0 

DMA Error? 

FC1AC6 67DC 

beq 

SFC1AA4 

ja, Fehler 

FC1AC8 3CBC0180 

move.w 

#$180,(A6) 

1772 Statusregister selektieren 

FC1ACC 610003D6 

bsr 

$FC1EA4 

rdiskctl, Register lesen 

FC1AD0 6100FD64 

bsr 

$FC1836 

errbits, Fehlernummer berechnen 

FC1AD4 C03C0044 

and.b 

#$44,DO 

write protect, und lost data testen 

FC1AD8 4E75 

rts 



FC1ADA 14C0 

move.b 

DO,(A2)+ 

Byte in Puffer schreiben 

FC1ADC 51C9FFFC 

dbra 

Dl,$FC1ADA 

nochmal 

FC1AE0 4E75 

rts 



*************************************************************** 

flopver, Sektor(en) verifizieren 

FC1AE2 610003DA 

bsr 

$FC1EBE 

change, Test auf Diskettenwechsel 

FC1AE6 70F5 

moveq.1 

#-11,DO 

Lesefehler als Default Error 

FC1AE8 6100015E 

bsr 

$FC1C48 

floplock, Parameter setzen 

FC1AEC 61000326 

bsr 

$FC1E14 

select 

FC1AF0 61000288 

bsr 

$FC1D7A 

go2track, Track suchen 

FC1AF4 660001D6 

bne 

$FC1CCC 

flopfail, Fehler 

FC1AF8 6104 

bsr 

$FC1AFE 

verifyl, Sektoren verifizieren 

FC1AFA 600001DE 

bra 

$FC1CDA 

flopok, fertig 




verifyl 

FC1AFE 3B7CFFF50A24 

move.w 

#-11,$A24(A5) 

Lesefehler 

FC1B04 246D0A12 

move.1 

$A12(A5),A2 

cdma, DMA-Puffer für bad sector list 

FC1B08 06AD000002000A12 

add.l 

#$200,$A12(A5) 

cdma auf nächsten Sektor 

FC1B10 3B7C000209F6 

move.w 

#2,$9F6(A5) 

retrycnt, 3 Versuche 

FC1B16 3CBC0084 

move.w 

#$84,(A6) 

Sektor Register selektieren 

FC1B1A 3E2D0A0C 

move.w 

$A0C(A5),D7 

csect, Sektornummer 

FC1B1E 61000370 

bsr 

$FC1E90 

wdiskctl, 07 an 1772 

FC1B22 13ED0A15FFFF860D 

move.b 

$A15(A5),$FFFF860D 


FC1B2A 13ED0A14FFFF860B 

move.b 

$A14(A5),$F F F F860B 

DMA-Adresse setzen 

FC1B32 13ED0A13FFFF8609 

move.b 

$A13(A5),$FFFF8609 


FC1B3A 3CBC0090 

move.w 

#$90,(A6) 


FC1B3E 3CBC0190 

move.w 

#$190,(A6) 

DMA-Status.löschen, lesen 

FC1B42 3CBC0090 

move.w 

#$90,(A6) 


FC1B46 3E3C0001 

move.w 

#1 ,D7 

Sektorzähler auf eins 

FC1B4A 61000344 

bsr 

SFC1E90 

wdiskctl, D7 an 1772 

FC1B4E 3CBC0080 

move.w 

#$80,(A6) 

1772 Befehlsregister selektieren 

FC1B52 3E3C0080 

move.w 

#$80,D7 

Read-Sector-Befehl 

FC1B56 61000338 

bsr 

$FC1E90 

wdiskctl, D7 an 1772 

FC1B5A 2E3C00040000 

move.1 

#$40000,07 

Timeout-Zähl er 

FC1B60 08390005FFF FFA01 

btst 

#5,$F F F F FA01 

MFP gpip, 1772 fertig? 

FC1B68 670A 

beq 

$FC1B74 

ja 

FC1B6A 5387 

subq.1 

#1 ,D7 

Timeout Zähler dekrementieren 

FC1B6C 66F2 

bne 

$F C1B60 

noch nicht abgelaufen? 

FC1B6E 6100028A 

bsr 

$FC1DFA 

reset 1772, Übertragung abbrechen 

FC1B72 6036 

bra 

SFCIBAA 

nächster Versuch 

FC1B74 3CBC0090 

move.w 

#$90,(A6) 

DMA-Statusregister selektieren 

FC1B78 3016 

move.w 

(A6),D0 

Status lesen 

FC1B7A 08000000 

btst 

#0,00 

DMA-Error? 

FC1B7E 672A 

beq 

$FC1BAA 

ja, nochmal versuchen 

FC1B80 3CBC0080 

move.w 

#$80,(A6) 

1772 Statusregister selektieren 

FC1B84 6100031E 

bsr 

SFC1EA4 

rdiskctl, Status lesen 

FC1B88 6100FCAC 

bsr 

$FC1836 

errbits, Fehlernummer berechnen 

FC1B8C C03C001C 

and.b 

#$1C,D0 

RNF, CRC-Fehler und Lost Data testen 

FC1B90 6618 

bne 

$FC1BAA 

Fehler, nächster Versuch 

FC1B92 526D0A0C 

addq.w 

#1,$A0C(A5) 

csect, nächster Sektor 

FC1B96 53600A10 

subq.w 

#1,$A10(A5) 

ccount, Sektorzähler dekrementieren 

FC1B9A 6600FF74 

bne 

SFC1B10 

noch ein Sektor? 

FC1B9E 04AD000002000A12 

sub. 1 

#$200,$A12(A5) 

cdma, DMA-Adresse zurücksetzen 

FC1BA6 4252 

clr.w 

(A2) 

Bad Sector List mit Null abschließen 

FC1BA8 4E75 

rts 



FC1BAA 0C6D000109F6 

cmp.w 

#1,$9F6(A5) 

retrycnt, 2. Versuch? 

FC1BB0 6604 

bne 

SFC1BB6 

nein 

FC1BB2 61000192 

bsr 

$FC1D46 

reseek, Home und Seek 

FC1BB6 536D09F6 

subq.w 

#1,$9F6(A5) 

retry count vermindern 
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FC1B8A 6A00FF66 

bpi 

SFC1B22 

noch ein Versuch? 

FC1BBE 34ED0A0C 

move.w 

$A0C(A5),(A2)+ 

csect, Sektornummer in Bad Sector List 

FC1BC2 60CE 

bra 

SFC1B92 

nächster Sektor 

*************************************************************** 

flopvbl, Floppy Vertical Blank Händler 

FC1BC4 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC1BC6 4DF9FFFF8606 

lea 

SFFFF8606,A6 

Adresse der Floppyregister 

FC1BCC 50ED0A04 

st 

$A04(A5) 

motoron Flag setzen 

FC1BD0 4A6D043E 

tst.w 

$43E(A5) 

flock, Floppi es aktiv? 

FC1BD4 6670 

bne 

SFC1C46 

ja, nichts machen 

FC1BD6 203900000466 

move.l 

$466,DO 

frclock 

FC1BDC 1200 

move.b 

DO,Dl 


FC1BDE C23C0007 

and.b 

#7, Dl 

mod 8 berechnen 

FC1BE2 6638 

bne 

SFClClC 

noch nicht 8. Interrupt? 

FC1BE4 3CBC0080 

move.w 

#$80,(A6) 

1772 Statusregister selektieren 

FC1BE8 E608 

Isr.b 

#3,DO 

Bit 4 als Drive-Nummer 

FC1BEA C07C0001 

and.w 

#1 ,D0 


FC1BEE 41ED09F8 

lea 

$9F8(A5),A0 

wpstatus 

FC1BF2 D0C0 

add.w 

DO, A0 


FC1BF4 B079000004A6 

cmp.w 

$4A6,D0 

_nflops 

FC1BFA 6602 

bne 

SFC1BFE 


FC1BFC 4240 

clr.w 

DO 


FC1BFE 5200 

addq.b 

#1 ,D0 

drive select Bit 

FC1C00 E308 

Isl.b 

#1,00 

in Position schieben 

FC1C02 0A000007 

eor.b 

#7,DO 

low aktiv 

FC1C06 61000258 

bsr 

SFC1E60 

Drive selektieren 

FC1C0A 3039FFFF8604 

move.w 

$FFFF8604,D0 

dskctl, 1772 Status lesen 

FC1C10 08000006 

btst 

#6,DO 

Urite Protect Bit testen 

FC1C14 5600 

sne 

(A0) 

und merken 

FC1C16 1002 

move.b 

D2,D0 

verherigen Select-Status 

FC1C18 61000246 

bsr 

JFC1E60 

wieder herstellen 

FC1C1C 302D09F8 

move.w 

$9F8(A5),D0 

wpstatus 

FC1C20 816D09FA 

or.w 

D0,$9FA(A5) 

in wplatch schreiben 

FC1C24 4A600A06 

tst.w 

$A06(A5) 

deslflg, Floppies schon deselektiert? 

FC1C28 6618 

bne 

SFC1C42 

ja 

FC1C2A 61000278 

bsr 

$FC1EA4 

1772 Status-Register lesen 

FC1C2E 08000007 

btst 

#7,DO 

Motor on Bit gesetzt? 

FC1C32 6612 

bne 

SFC1C46 

ja, nicht deselektieren 

FC1C34 103C0007 

move.b 

#7,DO 

beide Drives 

FC1C38 61000226 

bsr 

$FC1E60 

deselektieren 

FC1C3C 3B7C00010A06 

move.w 

#1,$A06(A5) 

deslflg setzen 

FC1C42 426D0A04 

clr.w 

$A04(A5) 

motoron Flag löschen 

FC1C46 4E75 

rts 


floplock 




FC1C48 48F978F800000A28 

movem.1 

D3-D7/A3-A6,$A28 

Register retten 

FC1C50 9BC0 

sub. 1 

A5,A5 

A5 löschen 

FC1C52 4DF9FFFF8606 

lea 

$FFFF8606,A6 

Adresse der Floppy-Register 

FC1C58 50F900000A04 

st 

$A04 

motoron Flag setzen 

FC1C5E 3B400A24 

move.w 

D0,$A24(A5) 

deferror 

FC1C62 3B400A26 

move.w 

D0,$A26(A5) 

currerr 

FC1C66 3B7C0001043E 

move.w 

#1,$43E(A5) 

flock, VBL-Floppy-Rout ine sperren 

FC1C6C 2B6F00080A12 

move.1 

8(A7),$A12(A5) 

cdma, Pufferadresse 

FC1C72 3B6F00100A08 

move.w 

16(A7),$A08(A5) 

cdev, Laufwerk 

FC1C78 3B6F00120A0C 

move.w 

18(A7),$A0C(A5) 

csect, Sektor 

FC1C7E 3B6F00140A0A 

move.w 

20(A7),$A0A(A5) 

ctrack, Track 

FC1C84 3B6F00160A0E 

move.w 

22(A7),$A0E(A5) 

cside, Seite 

FC1C8A 3B6F00180A10 

move.w 

24(A7),$A10(A5) 

ccount, Anzahl Sektoren 

FC1C90 3B7C000209F6 

move.w 

#2,$9F6(A5) 

retrycnt, 3 Versuche 

FC1C96 43ED0A4C 

lea 

$A4C(A5),A1 

Adresse dsbO 

FC1C9A 4A600A08 

tst.w 

SA08(A5) 

cdev, Laufwerk A? 

FC1C9E 6704 

beq 

SFC1CA4 

ja 

FC1CA0 43ED0A50 

lea 

$A50(A5),A1 

sonst Adresse dsbl 

FC1CA4 4A690000 

tst.w 

(AI) 

dcurtrack, aktueller Track 

FC1CA8 6A20 

bpi 

SFC1CCA 

gültig? 

FC1CAA 61000168 

bsr 

SFC1E14 

select, Drive und Seite selektieren 

FC1CAE 42690000 

clr.w 

(AI) 

Track-Nummer auf Null 

FC1CB2 610000EC 

bsr 

SFC1DA0 

restore, Track suchen 

FC1CB6 6712 

beq 

SFC1CCA 

ok? 

FC1CB8 7E0A 

moveq.1 

#10,D7 

Track 10 
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FC1CBA 6172 

bsr 

$FC1D2E 

hseek, Track suchen 

FC1CBC 6606 

bne 

SFC1CC4 

Fehler? 

FC1CBE 610000E0 

bsr 

SFC1DA0 

restore, Track Null suchen 

FC1CC2 6706 

beq 

SFC1CCA 

ok? 

FC1CC4 337CFF000000 

move.w 

#$FF00,(A1) 

Track-Nummer ungültig 

FC1CCA 4E75 

rts 



*************************************************************** 

flopfail, Fehler bei Floppy-Zugriff 

FC1CCC 7001 

moveq.1 

#1,D0 

media change auf 'unsure' 

FC1CCE 61000226 

bsr 

SFC1EF6 

setzen 

FC1CD2 302D0A26 

move.w 

$A26(A5),D0 

currerr, Fehlernummer 

FC1CD6 48C0 

ext.l 

DO 


FC1CD8 6002 

bra 

$FC1CDC 


*************************************************************** 

flopok, fehlerfreie Floppyroutine 

FC1CDA 4280 

clr.l 

DO 

kein Fehler 

FC1CDC 2F00 

move.1 

D0,-(A7) 

Fehlernummer merken 

FC1CDE 3CBC0086 

move.w 

#$86,(A6) 

1772 selektieren 

FC1CE2 3E290000 

move.w 

(A1),D7 

Track-Nummer holen 

FC1CE6 610001A8 

bsr 

SFC1E90 

wdiskctl, D7 an 1772 

FC1CEA 3C3C0010 

move.w 

#$10,D6 

Seek-Befehl 

FC1CEE 610000C6 

bsr 

SFC1DB6 

flopcmds 

FC1CF2 303900000A08 

move.w 

SA08,DO 

cdev, Drive-Nummer 

FC1CF8 E548 

Isl.w 

#2, DO 

als Langwort Index 

FC1CFA 41F9000009FC 

lea 

$9FC,A0 

acctim 

FC1D00 21AD04BA0000 

move.1 

$4BA(A5),(A0,D0.w) 

_hz_200 als letzte Zugriffszeit 

FC1D06 0C790001000004A6 

cmp.w 

#1,$4A6 

_nflops 

FC1D0E 6606 

bne 

$FC1D16 

nur ein Drive? 

FC1D10 216004BA0004 

move.1 

$4BA(A5),4(A0) 

_hz_200 als letzte Zugriffszeit 

FC1D16 201F 

move.1 

(A7)+,D0 

Fehlernummer zurückholen 

FC1D18 4CF978F800000A28 

movem.1 

$A28,D3-D7/A3-A6 

Register zurückholen 

FC1D20 42790000043E 

clr.w 

$43E 

flock, VBL-Floppy-Rout ine frei geben 

FC1D26 4E75 

rts 



*************************************************************** 

hseek, Track suchen 

FC1D28 3E3900000A0A 

move.w 

$A0A,D7 

ctrack, Track-Nummer 

FC1D2E 33FCFFFA00000A26 

move.w 

#-6,$A26 

Seek Error, Track nicht gefunden 

FC1D36 3CBC0086 

move.w 

#$86,(A6) 

1772 selektieren 

FC1D3A 61000154 

bsr 

$FC1E90 

wdiskctl, D7 an 1772 

FC1D3E 3C3C0010 

move.w 

#$10,D6 

Seek-Befehl 

FC1D42 60000072 

bra 

$FC1DB6 

flopcmds 

************************ 

*************************************** 

reseek, Home und Seek 

FC1D46 33FCFFFA00000A26 

move.w 

#•6,$A26 

Seek Error, Track nicht gefunden 

FC1D4E 6150 

bsr 

$FC1DA0 

restore 

FC1D50 664C 

bne 

SFC1D9E 

Fehler? 

FC1D52 42690000 

clr.w 

(AI) 

Track-Nummer auf Null 

FC1D56 3CBC0082 

move.w 

#$82,(A6) 

Track-Register selektieren 

FC1D5A 4247 

clr.w 

D7 

Track Null 

FC1D5C 61000132 

bsr 

$FC1E90 

wdiskctl, D7 an 1772 

FC1D60 3CBC0086 

move.w 

#$86,(A6) 

Datenregister selektieren 

FC1D64 3E3C0005 

move.w 

#5,D7 

Track 5 

FC1D68 61000126 

bsr 

SFC1E90 

wdiskctl, D7 an 1772 

FC1D6C 3C3C0010 

move.w 

#$10,D6 

Seek-Befehl 

FC1D70 6144 

bsr 

$FC1DB6 

flopcmds 

FC1D72 662A 

bne 

SFC1D9E 

Fehler? 

FC1D74 337C00050000 

move.w 

#5,(AI) 

Track-Nummer auf 5 




go2track, Track suchen 

FC1D7A 33FCFFFA00000A26 

move.w 

#-6,$A26 

Seek Error, Track nicht gefunden 

FC1D82 3CBC0086 

move.w 

#$86,(A6) 

Datenregister selektieren 

FC1D86 3E2D0A0A 

move.w 

$A0A(A5),D7 

Track-Nummer 

FC1D8A 61000104 

bsr 

$FC1E90 

wdiskctl, D7 an 1772 

FC1D8E 7C14 

moveq.1 

#$14,D6 

Seek mit Verify-Befehl 

FC1D90 6124 

bsr 

SFC1DB6 

flopcmds 

FC1D92 660A 

bne 

SFC1D9E 

Fehler? 

FC1D94 336O0A0A0000 

move.w 

$A0A(A5),(A1) 

Track-Nummer merken 

FC1D9A CE3C0018 

and.b 

#$18,D7 

RNF und CRC-Fehler testen 

FC1D9E 4E75 

rts 



************************ 

*************************************** 

restore, Track Null suchen 

FC1DA0 4246 

clr.w 

D6 

restore Befehl 

FC1DA2 6112 

bsr 

SFC1DB6 

flopcmds 

FC1DA4 660E 

bne 

$FC1DB4 

Fehler? 
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FC1DA6 08070002 

btst 

#2,D7 


Track Null Bit testen 

FC1DAA 

0A3C0004 

eor.b 

#4, SR 


Z-Flag invertieren 

FC1DAE 

6604 

bne 

SFC1DB4 


nicht Track Null? 

FC1DB0 42690000 

clr.w 

(AI) 


Track-Nummer auf Null 

F C1 DBA 

4E75 

rts 




************************************************************ 

*•* 

flopcmds 

FC1DB6 

30290002 

move.w 

2(A1),D0 


Seekrate 

FC1DBA 

C03C0003 

and.b 

#3, DO 


Bit 0 und 1 isolieren 

FC1DBE 

8C00 

or.b 

DO,06 


zu Befehlswort Odern 

FC1DC0 

2E3C00040000 

move.1 

#$40000,07 


Timeout-Zähler 

FC1DC6 

3CBC0080 

move.w 

#$80,(A6) 


1772 selektieren 

FC1DCA 

610000D8 

bsr 

SFC1EA4 


rdiskctl 

FC1DCE 

08000007 

btst 

#7,00 


Motor on? 

FC1DD2 

6606 

bne 

SFC1DDA 


ja 

FC1DD4 

2E3C00060000 

move.1 

#$60000,D7 


sonst längeres Timeout 

FC1DDA 

610000AA 

bsr 

SFC1E86 


wdiskctl6, Befehl in D6 schreiben 

FC1DDE 

5387 

subq.1 

#1 ,D7 


Timeout-Zähler dekrementieren 

FC1DE0 

6712 

beq 

$FC1DF4 


abgelaufen? 

FC1DE2 

08390005 F F F F FA01 

btst 

#5,$FFFFFA01 


MFP gpip. Floppy fertig? 

FC1DEA 

66F2 

bne 

$FC1DDE 


nein, warten 

FC1DEC 

610000AC 

bsr 

$FC1E9A 


rdiskctl7, Status lesen 

FC1DF0 

4246 

clr.w 06 


ok 


FC1DF2 

4E75 

rts 




FC1DF4 

6104 

bsr 

$FC1DFA 


reset 1772 

FC1DF6 

7C01 

moveq.1 

#1,06 


Fehler 

FC1DF8 

4E75 

rts 




************************** 

*************1 



reset 1772, Reset Floppy Controller 

FClDFA 

3CBC0080 

move.w 

#$80,(A6) 


Befehlsregister selektieren 

FC1DFE 

3E3C00D0 

move.w 

#$00,07 


reset-Befehl 

FC1E02 

6100008C 

bsr 

$FC1E90 


wdiskctl, D7 an 1772 

FC1E06 

3E3C000F 

move.w 

#$F,D7 


Verzögerungszähler 

FC1E0A 

51CFFFFE 

dbra 

D7,$FC1E0A 


Zeit abgelaufen? 

FC1E0E 

6100008A 

bsr 

$FC1E9A 


rdiskctl, Status lesen 

FC1E12 4E75 

rts 



select, Drive und Seite selektieren 






FC1E14 

42600A06 

clr.w 

$A06(A5) 


deslflg löschen 

FC1E18 

302D0A08 

move.w 

$A08(A5),D0 


cdev, Drive-Nunmer 

FC1E1C 

5200 

addq.b 

#1 ,D0 



FC1E1E 

E308 

Isl.b 

#1 ,00 


Bitnunmer berechnen 

FC1E20 

806D0A0E 

or.w 

$A0E(A5),D0 


csid, Seite in Bit 0 

FC1E24 

0A000007 

eor.b 

#7,00 


Bits sind low aktiv 

FC1E28 

C03C0007 

and.b 

#7, DO 



FC1E2C 

6132 

bsr 

$FC1E60 


setporta, Bits setzen 

FC1E2E 

3CBC0082 

move.w 

#$82,(A6) 


Track-Register selektieren 

FC1E32 

3E290000 

move.w 

(Al),D7 


Track-Nummer holen 

FC1E36 

6158 

bsr 

$FC1E90 


wdiskctl, 07 an 1772 

FC1E38 

422D0A20 

clr.b 

$A20(A5) 


tmpdma, Bit 24-31 löschen 

FC1E3C 

3CBC0084 

move.w 

#$84,(A6) 


Sektor-Register selektieren 

FC1E40 

3E2D0A0C 

move.w 

$A0C(A5),D7 


csect, Sektornunmer holen 

FC1E44 

614A 

bsr 

$FC1E90 


wdiskctl, D7 an 1772 

FC1E46 

13ED0A15FFFF860D 

move.b 

SA15(A5),$FFFF860D 



FC1E4E 

13ED0A14FFFF860B 

move.b 

$A14(A5),$FFFF860B 


DMA-Adresse setzen 

FC1E56 

13ED0A13FFFF8609 

move.b 

$A13(A5),$FFFF8609 



FC1E5E 

4E75 

rts 




*************************************************************** 

setporta, Drive und Seite selektieren 

FC1E60 

40E7 

move.w 

SR,-(A7) 


Status retten 

FC1E62 

007C0700 

or.w 

#$700,SR 


IPL 7, Interrupts sperren 

FC1E66 

13FC000EFFFF8800 

move.b 

#$E,$FFFF8800 


Port A selektieren 

FC1E6E 

1239FFFF8800 

move.b 

$FFFF8800,D1 


Daten vom Port lesen 

FC1E74 

1401 

move.b 

01,D2 


und merken 

FC1E76 

C23C00F8 

and.b 

#$F8,D1 


Bit 0-2 löschen 

FC1E7A 

8200 

or.b 

DO,Dl 


neue Bits setzen 

FC1E7C 

13C1FFFF8802 

move.b 

01,$FFFF8802 


Ergebnis wieder in Port A schreiben 

FC1E82 

460 F 

move.w 

(A7)+,SR 


Status zurückholen 

FC1E84 

4E75 

rts 




*************************************************************** 

wdiskct6 

FC1E86 

6124 

bsr 

$FC1EAC 


Verzögerung für Diskcontroller 

FC1E88 

33C6FFFF8604 

move.w 

D6,$FFFF8604 


D6 an Diskcontroller 
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FC1E8E 601C 

bra 

SFC1EAC 

Verzögerung für Diskcontroller 
wdiskctl 

Verzögerung für Diskcontroller 

FC1E90 611A 

bsr 

SFC1EAC 

FC1E92 33C7FFFF8604 

move.w 

D7,SFFFF8604 

D7 an Diskcontroller 

FC1E98 6012 

bra 

SFC1EAC 

Verzögerung für Diskcontroller 

*************************************************************** 

rdiskct7 

FC1E9A 6110 

bsr 

SFC1EAC 

Verzögerung für Diskcontroller 

FC1E9C 3E39FFFF8604 

move.w 

$FFFF8604,D7 

Diskcontroller-Status nach D7 

FC1EA2 6008 

bra 

$FC1EAC 

Verzögerung für Diskcontroller 

FC1EA4 6106 

bsr 

SFC1EAC 

rdiskctl 

Verzögerung für Diskcontroller 

FC1EA6 3039FFFF8604 

move.w 

$FFFF8604,D0 

Diskcontroller-Status lesen 

FC1EAC 40E7 

move.w 

SR,-(A7) 

Statusregister retten 

FC1EAE 3F07 

move.w 

D7,•(A7) 

D7 retten 

FC1EB0 3E3C0020 

move.w 

#*20,D7 

Zähler 

FC1EB4 51CFFFFE 

dbra 

D7.SFC1EB4 

Verzögerungschleife 

FC1EB8 3E1F 

move.w 

(A7)*,D7 

D7 zurückholen 

FC1EBA 46DF 

move.w 

(A7)+,SR 

Statusregister zurückholen 

FC1EBC 4E75 

rts 


change, Test auf Diskettenwechsel 
_flops 

FC1EBE 0C790001000004A6 

cmp.w 

#1,S4A6 

FC1EC6 662C 

bne 

SFC1EF4 

keine oder zwei Floppies, fertig 

FC1EC8 302F0010 

move.w 

16(A7),D0 

Drive-Nummer 

FC1ECC B07900007DC4 

cmp.w 

$7DC4,D0 

gleich Diskettennummer? 

FC1ED2 671C 

beq 

SFC1EF0 

ja 

FC1E04 3F00 

move.w 

DO,-(A7> 

Drive-Nummer 

FC1ED6 3F3CFFEF 

move.w 

#•17,*(A7) 

1 Insert Disk 1 

FC1EDA 6100E90C 

bsr 

SFC07E8 

critical error handler 

FC1EDE 584F 

addq.w 

#4,A7 

Stackpointer korrigieren 

FC1EE0 33FCFFFF000009FA 

move.w 

#-1,$9FA 

wplatch, Status unsicher 

FC1EE8 33EF001000007DC4 

move.w 

16(A7),$7DC4 

Diskettennummer merken 

FC1EF0 426F0010 

clr.w 

16(A7) 

Drive-Nummer auf Null 

FC1EF4 4E75 

rts 


setdmode, Drive-Change-Modus setzen 
Adresse des dsb 

FC1EF6 41F90000755A 

lea 

$755A,A0 

FC1EFC 1F00 

move.b 

DO,•(A7) 

Modus merken 

FC1EFE 302D0A08 

move.w 

SA08(A5),D0 

cdev, Drive-Nummer holen 

FC1F02 119F0000 

move.b 

(A7)+,(A0,D0.w) 

Drive-Mode setzen 

FC1F06 4E75 

rts 


Jdostime, IKBD-Format in DOS-Format 

A5 löschen 

FC1F08 4BF900000000 

lea 

S0,A5 

FC1F0E 41ED0E47 

lea 

$E47(A5),A0 

Zeiger auf Uhrzeit-Puffer 

FC1F12 610000DA 

bsr 

SFC1FEE 

bcdbin 

FC1F16 04000050 

sub.b 

#80,DO 

Offset von 80 abziehen 

FC1F1A 1400 

move.b 

DO,02 

Jahr 

FC1F1C E982 

asl.l 

#4,D2 

in Position schieben 

FC1F1E 610000CE 

bsr 

SFC1FEE 

bcdbin 

FC1F22 D400 

add.b 

DO,02 

Monat addieren 

FC1F24 EB82 

asl.l 

#5,02 

in Position schieben 

FC1F26 610000C6 

bsr 

SFC1FEE 

bdcbin 

FC1F2A D400 

add.b 

00,D2 

Tag addieren 

FC1F2C EB82 

asl. 1 

#5,02 

in Position schieben 

FC1F2E 610000BE 

bsr 

SFC1FEE 

bcdbin 

FC1F32 D400 

add.b 

D0.D2 

Stunde addieren 

FC1F34 ED82 

asl.l 

#6,D2 

in Position schieben 

FC1F36 610000B6 

bsr 

SFC1FEE 

bcdbin 

FC1F3A D400 

add.b 

DO,02 

Minute addieren 

FC1F3C EB82 

asl. 1 

#5,D2 

in Position schieben 

FC1F3E 610000AE 

bsr 

SFC1FEE 

bcdbin 

FC1F42 E208 

Isr.b 

#1 ,D0 

2- Sekunden-Auflösung 

FC1F44 D400 

add.b 

D0,D2 

Sekunden addieren 

FC1F46 2B420E50 

move.1 

D2,$E50(A5) 

neue Zeit speichern 

FC1F4A 1B7C00000E92 

move.b 

#0,$E92(A5) 

Handshake-Flag löschen 

FC1F50 4E75 

rts 


gettime, aktuelle Zeit von IKBD-Uhr holen 

FC1F52 1B7CFFFF0E92 

move.b 

#$FFFF,$E92(A5) 

Handshake-Flag setzen 

FC1F58 123C001C 

move.b 

#*1C,D1 

get time of day Befehl 

FC1F5C 61000294 

bsr 

$FC21F2 

an IKBD senden 
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FC1F60 

4A2D0E92 

tst.b 

$E92(A5) 

neue Zeit schon angekommen? 

FC1F64 

66FA 

bne 

SFC1F60 

nein, warten 

FC1F66 

202D0E50 

move.1 

SE50(A5),00 

Zeit nach DO holen 

FC1F6A 4E75 

rts 







*** settime, Uhrzeit und Datum setzen 

FC1F6C 2B6F00040E54 

move.1 

4(A7),SE54(A5) 

Zeit übergeben 





*** ikbdtime 

FC1F72 

41F900000E5E 

lea 

$E5E,A0 

Zeiger auf Ende des Time-Puffers 

FC1F78 

242D0E54 

move.1 

$E54(A5),D2 

umzuwandlende Zeit holen 

FC1F7C 

1002 

move.b 

02,DO 


FC1F7E 

0200001F 

and.b 

#$1F,00 

Bit 0*4, Sekunden 

FC1F82 

E300 

asl.b 

#1 ,D0 

2- Sekunden-Auflösung 

FC1F84 

6154 

bsr 

SFC1FDA 

binbcd 

FC1F86 

EA8A 

tsr.l 

#5,02 

Minuten 

FC1F88 

1002 

move.b 

02,00 


FC1F8A 

0200003F 

and.b 

#S3F,D0 

Bit 0-5, Minuten 

FC1F8E 

614A 

bsr 

SFC1FDA 

binbcd 

FC1F90 

EC8A 

Isr.l 

#6,02 

Stunden 

FC1F92 

1002 

move.b 

02, DO 


FC1F94 

0200001F 

and.b 

#$1F,D0 

Bit 0*4, Stunden 

FC1F98 

6140 

bsr 

SFC1FDA 

binbcd 

FC1F9A 

EA8A 

Isr.l 

#5,02 

TagFClF9C 1002 move.b D2.00 

FC1F9E 

0200001F 

and.b 

#S1F,D0 

Bit 0-4, Tag 

FC1FA2 

6136 

bsr 

SFC1FDA 

binbcd 

FC1FA4 

EA8A 

Isr.l 

#5,02 

Monat 

FC1FA6 

1002 

move.b 

D2,D0 


FC1FÄ8 

0200000F 

and.b 

#$F,00 

Bit 0-3, Monat 

FC1FAC 

612C 

bsr 

SFC1FDA 

binbcd 

FC1FAE 

E88A 

Isr.l 

#4,D2 

Jahr 

FC1FB0 

1002 

move.b 

02,00 


FC1FB2 

0200007F 

and.b 

#$7F,00 

Bit 0-6, Jahr 

FC1FB6 

6122 

bsr 

SFC1FDA 

binbcd 

FC1FB8 

06100080 

add.b 

#S80,(A0) 

plus Offset 

FC1FBC 

123C001B 

move.b 

#$1B,D1 

set time of day Befehl 

FC1FC0 

61000230 

bsr 

SFC21F2 

an IKBD senden 

FC1FC4 

7605 

moveq.1 

#5,D3 

Anzahl Bytes minus 1 

FC1FC6 

45F900000E58 

lea 

$E58,A2 

Adresse des Time-Puffers 

FC1FCC 

6100024E 

bsr 

SFC221C 

ikbdws, String senden 

FC1FD0 

123C001C 

move.b 

#*1C,D1 

Get time of day Befehl 

FC1FD4 

6100021C 

bsr 

SFC21F2 

an IKBD senden 

FC1FD8 

4E75 

rts 







*** binbcd, Byte nach BCD konvertieren 

FC1FDA 

7200 

moveq.1 

#0,01 


FC1FDC 

1200 

move.b 

DO,01 

Byte nach Dl 

FC1FDE 

83FC000A 

divs.w 

#SA,D1 

Zehnerstelle islolieren 

FC1FE2 E941 

asl.w 

#4,01 

in oberes Nibble schreiben 

FC1FE4 3001 

move.w 

01, DO 


FC1FE6 4841 

swap 

Dl 


FC1FE8 0041 

add.w 

01,00 

Einerstelle addieren 

FC1FEA 

1100 

move.b 

00,*(AO) 

Ergebnis in Puffer schreiben 

FC1FEC 

4E75 

rts 







bcdbin, BCO nach binar konvertieren 

FC1FEE 

1018 

move.b 

(A0)*,D0 

BCO-Byte holen 

FC1FF0 

1200 

move.b 

00,01 


FC1FF2 C07C000F 

and.w 

#$F,D0 

signifikanten Teil isolieren 

FC1FF6 C27C00F0 

and.w 

#$F0,D1 

Zehnerstelle isolieren 

FC1FFA 

E841 

asr.w 

#4,01 

in unteres Nibble schieben 

FC1FFC C2FC000A 

mulu.w 

#$A,D1 

mal 10 

FC2000 0041 

add.w 

01,DO 

plus Einerstelle 

FC2002 4E75 

rts 







*** midiost, MIDI Ausgabestatus 

FC2004 

70FF 

moveq.1 

#-1,00 

Default auf ok 

FC2006 

1439FFFFFC04 

move.b 

SFFFFFC04.D2 

MIDI ACIA Status lesen 

FC200C 

08020001 

btst 

#1 ,D2 

und testen 

FC2010 6602 

bne 

SFC2014 

ok 

FC2012 

7000 

moveq.1 

#0,00 

nicht ok, ACIA sendet gerade 

FC2014 

4E75 

rts 
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FC2016 322F0006 

FC201A 43F9FFFFFC04 
FC2020 14290000 

FC2024 08020001 

FC2028 67F6 

FC202A 13410002 

FC202E 4E75 

move.w 

lea 

move.b 

btst 

beq 

move.b 

rts 

6<A7),D1 
$FFFFFC04,A1 
(Al),D2 
#1 ,D2 

SFC2020 

01,2(A1) 

** midiwc, Zeichen an MIDI ausgeben 
Zeichen holen 

MIDI ACIA Control 

MIDI-Status holen 
ok? 

nein, warten 

Byte ausgeben 




** midiws, String an MIDI senden 

FC2030 7600 

moveq.1 

#0,03 

(überflüssig !) 

FC2032 362F0004 

move.w 

4(A7),D3 

Länge des Strings minus 1 

FC2036 246F0006 

move.l 

6(A7),A2 

Adresse des Strings 

FC203A 121A 

move.b 

(A2)+,D1 

Zeichen holen 

FC203C 61DC 

bsr 

SFC201A 

und senden 

FC203E 51CBFFFA 

dbra 

D3,$FC203A 

nächstes Zeichen 

FC2042 4E75 

rts 






** midstat, MIDI Empfängerstatus 

FC2044 41ED0D84 

lea 

$O84(A5),A0 

iorec für MIDI 

FC2048 43F9FFFFFC04 

lea 

$FFFFFC04,A1 

MIDI ACIA Control 

FC204E 70FF 

moveq.1 

#-1,D0 

Default auf ok 

FC2050 45E80006 

lea 

6(A0),A2 

Adresse Head-Index 

FC2054 47E80008 

lea 

8(A0),A3 

Adresse Tail-Index 

FC2058 BS4B 

cmpm.w 

(A3)+,(A2)+ 

Zeichen im Puffer? 

FC205A 6602 

bne 

SFC205E 

ja 

FC205C 7000 

moveq.1 

#0,00 

kein Zeichen bereit 

FC205E 4E75 

rts 






** midin, Zeichen von MIDI holen 

FC2060 61E2 

bsr 

SFC2044 

midstat, Zeichen bereit? 

FC2062 4A40 

tst.w 

00 


FC2064 67FA 

beq 

SFC2060 

nein, warten 

FC2066 40E7 

move.w 

SR,-(A7) 

Status retten 

FC2068 007C0700 

or.w 

#$700,SR 

IPL 7, Interrupts sperren 

FC206C 32280006 

move.w 

6(A0),D1 

Head-Index 

FC2070 B2680008 

cmp.w 

8(A0),D1 

mit Tail-Index vergleichen 

FC2074 6716 

beq 

SFC208C 

Puffer leer? 

FC2076 5241 

addq.w 

#1, D1 

Head Index erhöhen 

FC2078 B2680004 

cmp.w 

4(A0),D1 

größer Puffergröße? 

FC207C 6502 

bcs 

SFC2080 

nein 

FC207E 7200 

moveq.1 

#0,01 

wieder am Pufferanfang starten 

FC2080 22680000 

move.1 

(A0),A1 

Pufferadresse 

FC2084 10311000 

move.b 

(AI,01.w),DO 

Zeichen aus Puffer holen 

FC2088 31410006 

move.w 

01,6(A0) 

neuen Head Index merken 

FC208C 460F 

move.w 

(A7)+,SR 

Status zurückholen 

FC208E 4E75 

rts 






** Istout, Druckerausgabe 

FC2090 082D00040E90 

btst 

#4,$E90(A5) 

RS 232 Drucker? 

FC2096 660001 IC 

bne 

SFC21B4 

ja, auf RS 232 ausgeben 

FC209A 242D04BA 

move.1 

$4BA(A5),D2 

_hz_200, 200 Hz Zähler 

FC209E 94AD0E84 

sub. 1 

$E84(A5),D2 

minus letzte Zeit 

FC20A2 0C82000003E8 

cmp. 1 

#1000,02 

weniger als 5 Sekunden? 

FC20A8 6518 

bcs 

SFC20C2 

ja, nicht ausgeben 

FC20AA 242D04BA 

move.1 

$4BA(A5),D2 

_hz_200 

FC20AE 6174 

bsr 

SFC2124 

Istostat, Drucker bereit? 

FC20B0 4A40 

tst.w 

00 


FC20B2 6618 

bne 

SFC20CC 

ja, Zeichen ausgeben 

FC20B4 262D04BA 

move.1 

$4BA(A5),D3 

_hz_200, 200 HZ Zähler 

FC20B8 9682 

sub. 1 

D2,D3 

minus letzte Zeit 

FC20BA 0C8300001770 

cmp.l 

#6000,D3 

größer 30 Sekunden? 

FC20C0 60EC 

bl t 

SFC20AE 

nein, warten 

FC20C2 7000 

moveq.1 

#0,00 

Zeichen nicht losgeworden 

FC20C4 2B6D04BA0E84 

move.l 

$4BA(A5),$E84(A5) 

_hz_200 als neue Zeit merken 

FC20CA 4E75 

rts 






'** Zeichen auf Parallelport ausgeben 

FC20CC 40C3 

move.w 

SR, 03 

Status merken 

FC20CE 007C0700 

or.w 

#$700,SR 

IPL 7, keine Interrupts 

FC20D2 7207 

moveq.1 

#7,01 

Register 7 

FC20D4 61000E30 

bsr 

SFC2F06 

selektieren 

FC20D8 00000080 

or.b 

#$80,DO 

Port B 
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FC20DC 7287 

moveq.1 

#$87,Dl 

Register 7 schreiben 

FC20DE 61000E26 

bsr 

SFC2F06 

Port B auf Ausgabe 

FC20E2 46C3 

move.w 

D3,SR 

Status zurückholen 

FC20E4 302F0006 

move.w 

6(A7),D0 

auszugebendes Zeichen 

FC20E8 728F 

moveq.1 

#$8F,Dl 

Port B schreiben 

FC20EA 61000E1A 

bsr 

SFC2F06 

Zeichen ausgeben 

FC20EE 61OE 

bsr 

SFC20FE 

Strobe low 

FC20F0 610C 

bsr 

SFC20FE 

Strobe low 

FC20F2 6104 

bsr 

SFC20F8 

Strobe high 

FC20F4 70FF 

moveq.1 

#-1 ,D0 

ok 

FC20F6 4E75 

rts 






Strobe high 

FC20F8 7420 

moveq.1 

#$20,02 

Bit 5 

FC20FA 60000E40 

bra 

$FC2F3C 

in Port A setzen 




Strobe low 

FC20FE 74DF 

moveq.1 

#$OF,D2 

Bit 5 

FC2100 60000E60 

bra 

$FC2F62 

in Port A löschen 

*************************************************************** 

Istin, Zeichen vom Parallelport holen 

FC2104 7207 

moveq.1 

#7,01 

Mixer 

FC2106 61000DFE 

bsr 

$FC2F06 

Register im PSG selektieren 

FC210A 0200007F 

and.b 

#$7F,D0 

Port B auf Eingabe 

FC210E 7287 

moveq.1 

#$87,Dl 

Register 7 schreiben 

FC2110 61000DF4 

bsr 

$FC2F06 

giacces 

FC2114 61E2 

bsr 

$FC20F8 

Strobe High = Empfänger bereit 

FC2116 610C 

bsr 

SFC2124 

Istostat, Zeichen angekommen? 

FC2118 4A40 

tst.w 

00 


FC211A 66FA 

bne 

$FC2116 

nein, warten 

FC211C 61E0 

bsr 

$FC20FE 

Strobe low = Empfänger busy 

FC211E 720F 

moveq.t 

#15,Dl 

Port B selektieren 

FC2120 60000DE4 

bra 

$FC2F06 

Byte vom Port lesen 

********************* 

****************************************** 

Istostat, Drucker Ausgabestatus 

FC2124 41F9FFFFFA01 

lea 

$FFFFFA01,A0 

MFP gpip 

FC212A 70FF 

moveq.1 

#-1,00 

Default auf ok 

FC212C 082800000000 

btst 

#0,(A0) 

Busy auf Low? 

FC2132 6702 

beq 

$FC2136 

ja 

FC2134 7000 

moveq.1 

#0,00 

Drucker nicht bereit 

FC2136 4E75 

rts 



*************************************************************** 

auxistat, RS 232 Eingabestatus 

FC2138 41F900000C54 

lea 

$C54,A0 

iorec für RS 232 

FC213E 70FF 

moveq.1 

#*1,D0 

Default auf ok 

FC2140 43E80006 

lea 

6(A0),AI 

Adresse Head Index 

FC2144 41E80008 

lea 

8(A0),A0 

Adresse Tail Index 

FC2148 B348 

cmpm.w 

(A0)+,(Al)+ 

Puffer leer? 

FC214A 6602 

bne 

SFC214E 

nein 

FC214C 7000 

moveq.1 

#0,00 

kein Zeichen bereit 

FC214E 4E75 

rts 



*************************************************************** 

auxin, RS 232 Eingabe 

FC2150 41F900000C54 

lea 

$C54,A0 

iorec für RS 232 

FC2156 6100073A 

bsr 

$FC2892 

rs232get, Zeichen aus Puffer holen 

FC215A 3F00 

move.w 

00,-<A7) 

und merken 

FC215C 4A280020 

tst.b 

32(A0) 

XON/XOFF oder RTS/CTS? 

FC2160 6734 

beq 

$FC2196 

nein 

FC2162 30280008 

move.w 

8(A0),D0 

Tail Index 

FC2166 90680006 

sub.w 

6(A0),D0 

minus Head Index 

FC216A 6A04 

bpi 

$FC2170 

wenn positiv, dann gleich Pufferinhalt 

FC216C D0680004 

add.w 

4(A0),D0 

sonst Puffergröße addieren 

FC2170 B068000A 

cmp.w 

10(A0 >,DO 

gleich Low Water Mark? 

FC2174 6E20 

bgt 

$FC2196 

nein, größer 

FC2176 4A28001E 

tst.b 

30(A0) 

XON aktiv? 

FC217A 671A 

beq 

$FC2196 

nein 

FC217C 4228001E 

clr.b 

30(A0) 

XON aktiv löschen 

FC2180 082800000020 

btst 

#0,32(A0) 

XON/XOFF-Mode? 

FC2186 6606 

bne 

$FC218E 

ja 

FC2188 61000724 

bsr 

$FC28AE 

dtroff, DTR auf Low 

FC218C 6008 

bra 

$0(A0),00 

gleich Low Water Mark? 

FC2174 6E20 

bgt 

$FC2196 

nein, größer 

FC2176 4A28001E 

tst.b 

30(A0) 

XON aktiv? 

FC217A 671A 

beq 

$FC2196 

nein 
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FC217C 4228001E 

clr.b 

30(A0) 

XON aktiv löschen 

FC2180 082800000020 

btst 

#0,32(A0) 

XON/XOFF-Mode? 

FC2186 6606 

bne 

SFC218E 

ja 

FC2188 61000724 

bsr 

SFC28AE 

dtroff, DTR auf Low 

FC218C 6008 

bra 

SFC2196 

fertig 

FC218E 117C00110021 

move.b 

#$11,33(A0) 

XON 

FC2194 612C 

bsr 

$FC21C2 

senden 

FC2196 301F 

move.w 

(A7)+,D0 

empfangenes Zeichen zurückholen 

FC2198 4E75 

rts 



*************************************************************** 

auxostat, RS 232 Ausgabe-Status 

FC219A 41F900000C62 

lea 

$C62,A0 

Zeiger auf iorec für RS 232 Ausgabe 

FC21A0 32280008 

move.w 

8(A0),D1 

Tail Index 

FC21A4 61000744 

bsr 

SFC28EA 

wrap, Index erhöhen 

FC21A8 70FF 

moveq.1 

#-1,D0 

Default auf Ausgabe bereit 

FC21AA B2680006 

cmp.w 

6(A0),D1 

mit Head Index vergleichen 

FC21AE 6602 

bne 

SFC21B2 

Puffer nicht voll? 

FC2180 7000 

moveq.1 

#0,00 

kein Platz im Puffer 

FC21B2 4E75 

rts 



*************************************************************** 

rs232put, RS 232 Ausgabe 

FC21B4 302F0006 

move.w 

6(A7),D0 

auszugebendes Zeichen 

FC21B8 41F900000C62 

lea 

$C62,A0 

Zeiger auf iorec für RS 232 Ausgabe 

FC21BE 610006B8 

bsr 

SFC2878 

Byte in RS 232 Ausgabepuffer schreiben 

FC21C2 45F9FFFFFA01 

lea 

SFFFFFA01,A2 

Zeiger auf MFP 

FC21C8 4A2A002C 

tst.b 

44(A2) 

Transmitter-Status-Register 

FC21CC 6A0C 

bpi 

SFC21DA 

Transmitter-Buffer noch nicht leer? 

FC21CE 40E7 

move.w 

SR,*(A7) 

Status retten 

FC21D0 007C0700 

or.w 

#$700,SR 

IPL 7, Interrupts sperren 

FC21D4 61000660 

bsr 

SFC2836 

RS 232 Handshake-Rout ine 

FC21D8 460F 

move.w 

(A7)+,SR 

Status zurückholen 

FC21DA 4E75 

rts 



*************************** 

************************************ 

ikbdost, I KBD Ausgabestatus 

FC21DC 70FF 

moveq.1 

#• 1,D0 

Default auf ok 

FC21DE 1439FFFFFC00 

move.b 

$FFFFFC00,D2 

Keyboard ACIA Status 

FC21E4 08020001 

btst 

#1 ,D2 

ACIA ready? 

FC21E8 6602 

bne 

$FC21EC 

ja 

FC21EA 7000 

moveq.1 

#O,D0 

nicht bereit 

FC21EC 4E75 

rts 



*************************************************************** 

ikbdwc, Byte an IKBD senden 

FC21EE 322F0006 

move.w 

6(A7),D1 

ausgzugebendes Zeichen 

FC21F2 43F9FFFFFC00 

lea 

$FFFFFC00,A1 

Keyboard ACIA Control 

FC21F8 14290000 

move.b 

(AI),D2 

ACIA Status holen 

FC21FC 08020001 

btst 

#1 ,D2 

bereit? 

FC2200 67F6 

beq 

SFC21F8 

nein, warten 

FC2202 343C03B6 

move.w 

#950,D2 

Zähler für Verzögerungsschleife 

FC2206 6108 

bsr 

SFC2210 

rts 

FC2208 51CAFFFC 

dbra 

D2.SFC2206 

weiter warten 

FC220C 13410002 

move.b 

01,2(A1) 

Zeichen senden 

FC2210 4E75 

rts 



*************************************************************** 

ikbdws, String an Keyboard senden 

FC2212 7600 

moveq.1 

#0,D3 

(überflüssig !) 

FC2214 362F0004 

move.w 

4(A7),D3 

Anzahl der Zeichen minus eins 

FC2218 246F0006 

move.1 

6(A7),A2 

Adresse des Strings 

FC221C 121A 

move.b 

(A2)+,D1 

Zeichen holen 

FC221E 6102 

bsr 

SFC21F2 

an Keyboard senden 

FC2220 51CBFFFA 

dbra 

D3,$FC221C 

nächstes Zeichen 

FC2224 4E75 

rts 



*************************************************************** 

constat, Tastatur Eingabestatus 

FC2226 41ED0C76 

lea 

$C76(A5),A0 

iorec für Keyboard 

FC222A 70FF 

moveq.1 

#-1,00 

Default auf ok 

FC222C 45E80006 

lea 

6(A0),A2 

Adresse Head-Index 

FC2230 47E80008 

lea 

8(A0),A3 

Adresse Tail-Index 

FC2234 B54B 

cmpm.w 

(A3)+,(A2)+ 

Puffer leer? 

FC2236 6602 

bne 

SFC223A 

nein, Zeichen da 

FC2238 7000 

moveq.1 

#0,00 

kein Zeichen da 

FC223A 4E75 

rts 



*************************************************************** 

conin, Zeichen von Tastatur holen 

FC223C 61E8 

bsr 

SFC2226 

constat, Zeichen vorhanden? 

FC223E 4A40 

tst.w 

DO 
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FC2240 67FA 

beq 

SFC223C 

FC2242 40E7 

move.w 

SR,-(A7) 

FC2244 007C0700 

or.w 

#$700,SR 

FC2248 32280006 

move.w 

6(A0),D1 

FC224C B2680008 

cmp.w 

8(A0),D1 

FC2250 6716 

beq 

SFC2268 

FC2252 5841 

addq.w 

#4,Dl 

FC2254 B2680004 

cmp.w 

4(A0),D1 

FC2258 6502 

bcs 

5FC225C 

FC225A 7200 

moveq.1 

#0,D1 

FC225C 22680000 

move.l 

(A0),A1 

FC2260 20311000 

move.l 

(AI,Dl.w),DO 

FC2264 31410006 

move.w 

D1,6(A0) 

FC2268 460F 

move.w 

(A7)+,SR 

FC226A 4E75 

rts 


*************************************************************** 

FC226C 70FF 

moveq.1 

#-1,D0 

FC226E 4E75 

rts 


*************************************************************** 

FC2270 082000020484 

btst 

#2,$484(A5) 

FC2276 670E 

beq 

5FC2286 

FC2278 2B7C00FC321C0E8A 

move.l 

#$FC321C,$E8A(A5) 

FC2280 1B7C00000E8E 

move.b 

#0,$E8E(A5) 

FC2286 4E75 

rts 


FC2288 001B313233343536 

dc.b 

$00,esc,'1*,'2',*3',*4*, 

FC2290 373839309E270809 

dc.b 

•7','8','9','0','B',"', 

FC2298 71776572747A7569 

dc.b 

•q','w','e 1 ,'r', 1 1*, 'z', 

FC22A0 6F70812B0D006173 

dc.b 

'o','p',’ü','+',cr, $00, 

FC22A8 646667686A6B6C94 

dc.b 

'd'.'f'.'g'/h'/j'/k', 

FC22B0 8423007E79786376 

dc.b 

•ä','#',500,'"'»'y'.'x', 

FC22B8 626E602C2E200000 

dc.b 

•b','n','m', 

FC22C0 0020000000000000 

dc.b 

$00,' ',$00,$00,$00,$00, 

FC22C8 0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00, 

FC22D0 00002D0000002B00 

dc.b 

$00,$00,'-',$00,$00,$00, 

FC22D8 0000007F00000000 

dc.b 

$00,$00,$00,del,$00,$00, 

FC22E0 0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00, 

FC22E8 3C000028292F2A37 

dc.b 

'<',$00,$00, 

FC22F0 3839343536313233 

dc.b 

•8','9',*4',*5','6',*1', 

FC22F8 302EODOOOOOOOOOO 

dc.b 

•0','.',cr, $00,500,500, 

FC2300 0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00, 

FC2308 001B2122DD242526 

dc.b 

$00,esc,','$•, 

FC2310 2F28293D3F600809 

dc.b 


FC2318 51574552545A5549 

dc.b 

•Q','W','E','R','T','Z', 

FC2320 4F509A2A00004153 

dc.b 

'O'.'P','ü','*',cr, $00, 

FC2328 444647484A4B4C99 

dc.b 

•D'/F'.'G'.'H'.'J'.'K', 

FC2330 8E5E007C59584356 

dc.b 

1 Ä',' A ',$00,' |',' Y 1 ,' X', 

FC2338 424E4D3B3A5F0000 

dc.b 

•B'.'N','M',';', 

FC2340 0020000000000000 

dc.b 

$00,' ',$00,$00,$00,$00, 

FC2348 0000000000000037 

dc.b 

$00,$00,$00,$00,$00,$00, 

FC2350 38002D3400362B00 

dc.b 

'8',$004',$00,'6', 

FC2358 3200307F00000000 

dc.b 

■2',$00,'0',del,$00,$00, 

FC2360 0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00, 

FC2368 3E000028292F2A37 

dc.b 

■>',$00,$00, 

FC2370 3839343536313233 

dc.b 

•8','9',*4',*5','6'.'1', 

FC2378 302EODOOOOOOOOOO 

dc.b 

'0','.',cr, $00,500,500, 

FC2380 0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00, 


nein, warten 
Status retten 
IPL 7, Interrupts sperren 
Head-Index 

mit Tail*Index vergleichen 
Puffer leer? 

Head-Index erhöhen 
gleich Puffergröße? 
nein 

Pufferzeiger wieder auf Start 

Pufferadresse 

Zeichen holen 

neuen Head-Index merken 

Status zurückholen 

conoutstat, Consol Ausgabestatus 
Status immer ok 

ringbel, Ton nach CTRL G 
conterm, Ton enabled? 
nein 

Zeiger auf Soundtabelle für Bell 
Soundtimer starten 

Tastaturtabelle, ungeshiftet 
,'5',*6' 

,bs, tab 


,' l',’ö' 

,'c','v' 

r $oo,soo 

,$oo,$oo 

,$oo,$oo 

,'+',$00 

,$oo,$oo 

,$ 00,500 

,'*',' 7 ' 

, *2','3' 

,$ 00,$00 
,$ 00,$00 

Tastaturtabelle, geshiftet 

,bs, tab 
,'U\'I' 

, ' A', • S' 

,' L', • Ö' 

,'C','V' 

,$ 00,$00 
, $ 00,500 
,$ 00 ,' 7 ' 

,'♦',$00 
, 500,500 
, 500,$00 
,'*'.'7' 

,'2','3* 

,$ 00,500 

,$ 00,500 

Tastaturtabelle, Caps lock 


FC2388 001B313233343536 

dc.b 

$00,esc,' 1', 

,' 2',' 3 ’, 

,'4',*5',*6' 

FC2390 373839309E270809 

dc.b 

•7'.'8',*9', 

, 1 0',' B', 

,''',bs, tab 

FC2398 51574552545A5549 

dc.b 

'Q','U','E', 

,'R','T•, 

,'Z','U','I' 

FC23A0 4F509A2B0D004153 

dc.b 

■O'.'P'.'Ü', 

,,cr, 

$00,'A','S* 

FC23A8 444647484A4B4C99 

dc.b 

•D'.'F'.'G' 

,' H', 1 J ', 

,'K','L','Ö' 

FC23B0 8E23007E59584356 

dc.b 

'Ä','#',$00, 

•Y', 

.'X'.'C'.'V' 

FC23B8 424E4D2C2E2D0000 

dc.b 

■B','N','H', 


,'-',$00,500 

FC23C0 0020000000000000 

dc.b 

$00,' ',$00, 

* 

o 

o 

* 

o 

o 

,500,500,500 

FC23C8 0000000000000000 

dc.b 

$00,$00,$00, 

,$00,$00,$00,$00,$00 
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FC23D0 

00002D0000002B00 

dc.b 

SOO.SOO.'-'.SOO.SOO.SOO, 

,'♦',$00 

FC2308 

0000007F00000000 

dc.b 

$00,$00,$00,del,$00,$00,$00,$00 

FC23E0 

0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00,$00,$00 

FC23E8 

3C000028292F2A37 

dc.b 

•<*,$00,$00,•(', 

, ,'7' 

FC23F0 

3839343536313233 

dc.b 

•8V9V4V5V6V1'. 

•2','3* 

FC23F8 

302E0D0000000000 

dc.b 

•0v.\$00,$00, $ 00 ,$ 00 , 

,$00,$00 

FC2400 

0000000000000000 

dc.b 

$00,$00,$00,$00,$00,$00, 

,$00,$00 





initmfp, MFP 68901 initialisieren 

FC2408 

41F9FFFFFA01 

lea 

$FFFFFA01,A0 

Adresse MFP 

FC240E 

7000 

moveq.1 

#0,00 

Register mit Null initialisieren 

FC2410 

01C80000 

movep.1 

D0,0(A0) 

gpip bis iera 

FC2414 

01C80008 

movep.1 

D0,8(A0) 

ierb bis isra 

FC2418 

01C80010 

movep.1 

D0,$10(A0) 

isrb bis vr 

FC241C 

117C00480016 

move.b 

#$48,22(A0) 

MFP Nonautovektor auf $40, S-Bit setzen 

FC2422 

08E800020002 

bset 

#2,2(A0) 

CTS auf High setzen 

FC2428 

3B7C11110E88 

move.u 

#$1111,$E88(A5) 

Timer C Bitmap auf jeden 4, IRQ 

FC242E 

3B7C00140442 

move.w 

#20,$442(A5) 

_timer_ms auf 20 Millisekunden 

FC2434 

7002 

moveq.1 

#2,00 

Timer C selektieren 

FC2436 

7250 

moveq.1 

#80,01 

/64 für 200 Hz 

FC2438 

343C00C0 

move.w 

#$C0,02 

192 

FC243C 

61000172 

bsr 

$FC25B0 

Timer und Interruptvektor initialisieren 

FC2440 

45F900FC311E 

lea 

$FC311E,A2 

Timer C Interrupt-Routine 

FC2446 

7005 

moveq.1 

#5,DO 

Timer C Interrupt-Nummer 

FC2448 

6100021C 

bsr 

$FC2666 

initint, Interrupt installieren 

FC244C 

7003 

moveq.1 

#3,00 

Timer D selektieren 

FC244E 

7201 

moveq.1 

#1,01 

/4 für 9600 Baud 

FC2450 

7402 

moveq.1 

#2,02 

9600 Baud 

FC2452 

6100015C 

bsr 

$FC25B0 

Timer und Interruptvektor initialisieren 

FC2456 

203C00880101 

move.1 

#$880101,DO 

$00, $88, $01, $01 

FC245C 

01C80026 

movep.1 

D0,$26(A0) 

nach scr, ucr, rsr, tsr 

FC2460 

61000AD0 

bsr 

$FC2F32 

DTR on 

FC2464 

61000448 

bsr 

$FC28AE 

dtroff, DTR auf Low 

FC2468 

41ED0C54 

lea 

$C54(A5),A0 

Zeiger auf iorec für RS 232 

FC246C 

43F900FC257E 

lea 

$FC257E,A1 

Startdaten für iorec 

FC2472 

7021 

moveq.1 

#33,DO 

34 Bytes 

FC2474 

610000E4 

bsr 

$FC255A 

ins RAM kopieren 

FC2478 

41ED0084 

lea 

$O84(A5),A0 

Zeiger auf iorec für MIDI 

FC247C 

43F900FC2570 

lea 

$FC2570,A1 

Startdaten für iorec 

FC2482 

700D 

moveq.1 

#13,00 

14 Bytes • 

FC2484 

61000004 

bsr 

$FC255A 

ins RAM kopieren 

FC2488 

203C00FC2A40 

move.l 

#$FC2A40,D0 

Keyboard und MIDI Error-Vektor 

FC248E 

2B400E16 

move.l 

D0,$E16(A5) 

Zeiger auf Error-Routine Keyboard 

FC2492 

2B400E1A 

move.l 

D0,$E1A(A5) 

Zeiger auf Error-Routine MIDI 

FC2496 

2B7C00FC2E940E12 

move.1 

#$FC2E94,$E12(A5) 

sysmidi-Vektor 

FC249E 

2B7C00FC29FC0E2E 

move.1 

#$FC29FC,$E2E(A5) 

midi sys-Vektor 

FC24A6 

2B7C00FC2A0C0E32 

move.1 

#$FC2A0C,$E32(A5) 

ikbdsys-Vektor 

FC24AE 

13FC0003FFFFFC04 

move.b 

#3,$FFFFFC04 

MIDI ACIA Control, Master Reset 

FC24B6 

13FC0095FFFFFC04 

move.b 

#$95,$FFFFFC04 

/16, 8 Bit, 1 Stopbit, no Parity 

FC24BE 

1B7C00070484 

move.b 

#7,$484(A5) 

conterm, Keyclick, Repeat und Bell enable 

FC24C4 

2B7C00FC1F080E26 

move.l 

#$FC1F08,$E26(A5) 

Jdostime, Uhrzeit-Vektor 

FC24CC 

203C00FC2558 

move.1 

#$FC2558,00 

Zeiger auf rts 

FC24D2 

2B400E1E 

move.1 

00,$E1E(A5) 

statvec, IKBO Statuspaket 

FC24D6 

2B400E22 

move.l 

D0,$E22(A5) 

mousevec, Mausaktion 

FC24DA 

2B400E2A 

move.l 

00,$E2A(A5) 

joyvec, Joystick-Aktion 

FC24DE 

7000 

move.l 

#0,00 

Soundvariablen löschen 

FC24E0 

2B400E8A 

move.l 

D0,$E8A(A5) 

Sound-Pointer 

FC24E4 

1B400E8E 

move.b 

D0,$E8E(A5) 

Delay-Timer 

FC24E8 

1B400E8F 

move.b 

D0,$E8F(A5) 

Temp-Value 

FC24EC 

2B400E84 

move.1 

D0,$E84(A5) 

Printer-Timeout 

FC24F0 

6100FC06 

bsr 

$FC20F8 

Strobe auf High 

FC24F4 

1B7C000F0E82 

move.b 

#$F,$E82(A5) 

Keyboard Verzögerung 1 

FC24FA 

1B7C00020E83 

move.b 

#2,$E83(A5) 

Keyboard Verzögerung 2 

FC2500 

41ED0C76 

lea 

$C76(A5),A0 

Zeiger auf iorec Keyboard 

FC2504 

43F900FC2562 

lea 

$FC2562,A1 

Startdaten für iorec 

FC250A 

7000 

moveq.1 

#13,00 

14 Bytes 

FC250C 

614C 

bsr 

$FC255A 

ins RAM kopieren 

FC250E 

61000BA4 

bsr 

$FC30B4 

Zeiger auf BIOS-Tastatur-Tabelle 

FC2512 

13FC00Q3FFFFFC00 

move.b 

#3,$FFFFFC00 

Keyboard ACIA Control, Master Reset 
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FC251A 13FC0096FFFFFC00 

move.b 

#$96,$FFFFFC00 

/64, 8 Bit, 1 Stopbit, no Parity 

FC2522 267C00FC25A0 

move.1 

#$FC25A0,A3 

Zeiger auf MFP Interruptvektoren 

FC2528 7203 

moveq.1 

#3, Dl 

4 Vektoren initialisieren 

FC252A 2401 

move.1 

Dl,02 


FC252C 2001 

move.1 

01,00 

Interrupt-Nunner 

FC252E 06000009 

add.b 

#9,00 

plus Offset 

FC2532 E582 

asl.l 

#2,02 


FC2534 24732000 

move.1 

(A3,D2.w),A2 

Vektor aus Tabelle holen 

FC2538 6100012C 

bsr 

SFC2666 

initint, Interrupt installieren 

FC253C 51C9FFEC 

dbra 

D1.SFC252A 

nächster Vektor 

FC2540 45F900FC29CE 

lea 

$FC29CE,A2 

MIDI und Keyboard Vektor 

FC2546 7006 

moveq.1 

#6,00 

Vektornummer 6 

FC2548 610001 IC 

bsr 

SFC2666 

initint, Interrupt installieren 

FC254C 45F900FC27AE 

lea 

$FC27AE,A2 

CTS*Interrupt-Rout ine 

FC2552 7002 

moveq.1 

#2,00 

Vektornuimer 2 

FC2554 61000110 

bsr 

SFC2666 

initint, Interrupt installieren 

FC2558 4E75 

rts 



FC255A 1009 

move.b 

(AI)+,(A0)+ 

Block Move 

FC255C 51C8FFFC 

dbra 

D0,$FC255A 

nächstes Byte 

FC2560 4E75 

rts 






** iorec für Keyboard 

FC2562 00000C84 

de. 1 

$C84 

Puffer-Adresse 

FC2566 0100 

dc.w 

S100 

Größe des Puffers 

FC2568 0000 

dc.w 

0 

Head Index 

FC256A 0000 

dc.w 

0 

Tail Index 

FC256C 0040 

dc.w 

$40 

Low Water Mark 

FC256E 00C0 

dc.w 

SCO 

High Water Mark 




'** iorec für MIDI 

FC2570 00000092 

de. 1 

SD92 

Puffer Adresse 

FC2574 0080 

dc.w 

$80 

Größe des Puffers 

FC2576 0000 

dc.w 

0 

Head Index 

FC2578 0000 

dc.w 

0 

Tail Index 

FC257A 0020 

dc.w 

S20 

Low Water Mark 

FC257C 0060 

dc.w 

$60 

High Water Mark 




** iorec für RS232 Eingabe 

FC257E 00000A54 

de. 1 

SA54 

Puffer-Adresse 

FC2582 0100 

dc.w 

S100 

Größe des Puffers 

FC2584 0000 

dc.w 

0 

Head-Index 

FC2586 0000 

dc.w 

0 

Tail-1ndex 

FC2588 0080 

dc.w 

$80 

Low Water Mark 

FC258A 00C0 

dc.w 

SCO 

High Water Mark 




** iorec RS 232 Ausgabe 

FC258C 00000B54 

de. 1 

SB54 

Puffer-Adresse 

FC2590 0100 

dc.w 

$100 

Größe des Puffers 

FC2592 0000 

dc.w 

0 

Head Index 

FC2594 0000 

dc.w 

0 

Teil Index 

FC2596 0080 

dc.w 

$80 

Low Water Mark 

FC2598 00C0 

dc.w 

$C0 

High Water Mark 

FC259A 00 

dc.b 

0 

rsrbyte, Receiver-Status 

FC259B 00 

de .b 

0 

tsrbyte Transmitter-Status 

FC259C 00 

dc.b 

0 

rxoff 

FC259D 00 

dc.b 

0 

txoff 

FC259E 01 

dc.b 

1 

rsmode, XON/XOFF und RTS/CTS-Modus 

FC259F 00 

dc.b 

0 

filier 




** Interruptvektoren für MFP 

FC25A0 00FC281C 

de. 1 

SFC281C 

#9, Transmitter Error 

FC25A4 00FC2794 

de. 1 

SFC2794 

#10, Transmitter Interrupt 

FC25A8 00FC27FA 

de. 1 

SFC27FA 

#11, Receiver Error 

FC25AC 00FC26F6 

de. 1 

SFC26F6 

#12, Receiver Interrupt 




** setimer, Timer im MFP initialisieren 

FC25B0 48E7F8F0 

movem. 1 

D0-D4/A0-A3,*(A7) 

Register retten 

FC25B4 207CFFFFFA01 

move.1 

#$FFFFFA01,A0 

Adresse MFP 

FC25BA 267C00FC2644 

move.1 

#$FC2644,A3 


FC25C0 247C00FC2648 

move.l 

#$FC2648,A2 

Timer Interrupt Mask Bit 

FC25C6 615A 

bsr 

SFC2622 

mskreg 

FC25C8 267C00FC2638 

move.l 

#$FC2638,A3 


FC25CE 247C00FC2648 

move.1 

#$FC2648,A2 

Timer Interrupt Enable Bit 
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FC25D4 614C 

bsr 

SFC2622 

mskreg 

FC25D6 267C00FC263C 

move.l 

#$FC263C,A3 


FC25DC 247C00FC2648 

move.1 

#$FC2648,A2 

Timer Interrupt Pending Bit 

FC25E2 613E 

bsr 

SFC2622 

mskreg 

FC25E-4 267C00FC2640 

move.1 

«FC2640.A3 


FC25EA 247C00FC2648 

move.1 

#$FC2648,A2 

Timer Interrupt Inservice Bit 

FC25F0 6130 

bsr 

JFC2622 

mskreg 

FC25F2 267C00FC264C 

move.1 

#$FC264C,A3 


FC25F8 247C00FC2650 

move.1 

#$FC2650,A2 

Timer Control Bit 

FC25FE 6122 

bsr 

SFC2622 

mskreg 

FC2600 C749 

exg 

A3, AI 

A3 merken 

FC2602 47F900FC2654 

lea 

$FC2654,A3 

Adresse Timer Datenregister 

FC2608 7600 

moveq.1 

#0,D3 


FC260A 16330000 

move.b 

(A3,DO.w),03 

Registernurmer holen 

FC260E 11823000 

move.b 

D2,(A0,D3.w) 

Daten in HFP schreiben 

FC2612 B4303000 

cmp.b 

(A0,D3.w),D2 

und lesen 

FC2616 66F6 

bne 

SFC260E 

bis Übereinstimung 

FC2618 C749 

exg 

A3,AI 

A3 zurückholen 

FC261A 8313 

or.b 

Dl,(A3) 

Timer-Control-Register maskieren 

FC261C 4CDF0F1F 

movem.1 

(A7)+,D0-D4/A0-A3 

Register zurückholen 

FC2620 4E75 

rts 



*************************************************************** 

mskreg 

FC2622 6106 

bsr 

SFC262A 

getmask 

FC2624 1612 

move.b 

<A2),D3 

Haske laden 

FC2626 C713 

and.b 

D3,(A3) 

und Bit(s) löschen 

FC2628 4E75 

rts 



*************************************************************** 

getmask 

FC262A 7600 

moveq.1 

#0,D3 

FC262C D6C0 

add.w 

DO, A3 

Basis plus Registernummer 

FC262E 1613 

move.b 

(A3),D3 

ergibt Adreßoffset im HFP 

FC2630 D688 

add.l 

A0,D3 

plus Adresse im HFP 

FC2632 2643 

move.1 

D3,A3 

nach A3 

FC2634 D4C0 

add.w 

D0,A2 

Zeiger auf die Haske 

FC2636 4E75 

rts 


HFP Registernummern 




FC2638 06060808 

dc.b 

6,6,8,8 

iera, iera, ierb, ierb 

FC263C 0A0A0C0C 

dc.b 

10,10,12,12 

ipra, ipra, iprb, iprb 

FC2640 OE OE 1010 

dc.b 

14,14,16,16 

isra, isra, isrb, isrb 

FC2644 12121414 

dc.b 

18,18,20,20 

imra, imra, imrb, imrb 

*************************************************************** 

Hasken für HFP-Register 

FC2648 DFFEDFEF 

dc.b 

$OF,$FE,$DF,$EF 

Bit 5, 0, 5, 4 löschen 

FC264C 181A1C1C 

dc.b 

S18,$1A,$1C,$1C 

Bit 3+4, Bit 1,3+4, Bit 2-4, Bit 2-4 setzen 

FC2650 00008FF8 

dc.b 

0,0,$8F,$F8 

kein, kein, Bit 5-7, Bit 0-2 löschen 

FC2654 1E202224 

dc.b 

SIE,$20,$22,$24 

But 2-4, Bit 5, Bit 1+5, Bit 2+5 setzen 

*************************************************************** 

mfpint, HFP Interruptvektor setzen 

FC2658 302F0004 

move.w 

4(A7),D0 

Interruptnummer 

FC265C 246F0006 

move.1 

6(A7),A2 

Interruptvektor 

FC2660 02800000000F 

and. 1 

#$F,D0 

Nummer 0-15, Langwort 

*************************************************************** 

initint, HFP Interruptvektor setzen 

FC2666 48E7E0E0 

movem.1 

D0-D2/A0-A2,•(A7) 

Register retten 

FC266A 6120 

bsr 

SFC268C 

disable Interrupt 

FC266C 2400 

move.l 

D0,D2 

Vektornummer 

FC266E E542 

asl .w 

#2,D2 

als Langwort Index 

FC2670 068200000100 

add.l 

#$100,D2 

plus Basisadresse der HFP-Vektoren 

FC2676 2242 

move.1 

D2,A1 

Vektoradresse 

FC2678 228A 

move.1 

A2,(A1) 

neuen Vektor setzen 

FC267A 614A 

bsr 

SFC26C6 

enable Interrupts 

FC267C 4CDF0707 

movem.1 

(A7)+,D0-D2/A0-A2 

Register zurückholen 

FC2680 4E75 

rts 


disint, HFP Interrupt disablen 




FC2682 302F0004 

move.w 

4(A7),D0 

Interruptnummer holen 

FC2686 02800000000F 

and. 1 

#$F,D0 

als Langwort Index 
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** disabel Interrupts 

FC268C 

48E7C0C0 

movem.1 

D0-D1/A0-A1,•<A7) 

Register retten 

FC2690 

41F9FFFFFA01 

lea 

SFFFFFA01.A0 

Adresse HFP 

FC2696 

43E80012 

lea 

18(A0),Al 

Adresse imra 

FC269A 

614A 

bsr 

SFC26E6 

zu löschende Bitnummer berechnen 

FC269C 

0391 

bclr 

Dl,(AI) 

und Bit löschen 

FC269E 

43E80006 

lea 

6(A0),AI 

Adresse iera 

FC26A2 

6142 

bsr 

SFC26E6 

zu löschende Bitnummer berechnen 

FC26A4 

0391 

bclr 

Dl,(AI) 

und Bit löschen 

FC26A6 

43E8000A 

lea 

10(A0),A1 

Adresse ipra 

FC26AA 

613A 

bsr 

SFC26E6 

zu löschende Bitnummer berechnen 

FC26AC 

0391 

bclr 

Dl,(AI) 

und Bit löschen 

FC26AE 

43E8000E 

lea 

14(A0),A1 

Adresse isra 

FC26B2 

6132 

bsr 

SFC26E6 

zu löschende Bitnummer berechnen 

FC26B4 

0391 

bclr 

Dl,(AI) 

und Bit löschen 

FC26B6 

4CDF0303 

movem.1 

(A7)+,D0-D1/A0-A1 

Register zurückholen 

FC26BA 

4E75 

rts 







** jenabint, HFP Interrupt enablen 

FC26BC 

302F0004 

move.w 

4(A7),D0 

Vektornummer 

FC26C0 

02800000000F 

and. 1 

#$F,D0 

als Langwort Index 

FC26C6 

48E7C0C0 

movem.1 

D0-D1/A0-A1,-(A7) 

Register retten 

FC26CA 

41F9FFFFFA01 

lea 

SFFFFFA01,A0 

Adresse HFP 

FC26D0 

43E80006 

lea 

6(A0),A1 

Adresse iera 

FC26D4 

6110 

bsr 

SFC26E6 

zu setzende Bitnummer berechnen 

FC26D6 

0301 

bset 

Dl,(AI) 

und Bit setzen 

FC26D8 

43E80012 

lea 

18(A0),A1 

Adresse imra 

FC260C 

6108 

bsr 

SFC26E6 

zu setzende Bitnummer berechnen 

FC260E 

0301 

bset 

Dl,(AI) 

und Bit setzen 

FC26E0 

4C0F0303 

movem. 1 

(A7)*,D0-D1/A0-A1 

Register zurückholen 

FC26E4 

4E75 

rts 







** bselect, Bit* und Registernummer bestimmen 

FC26E6 

1200 

move.b 

DO,Dl 

Interruptnummer merken 

FC26E8 0C010008 

cmp.b 

#8,Dl 

größer 8? 

FC26EC 6004 

bl t 

SFC26F2 

nein 

FC26EE 

5141 

subq.w 

#8,01 

8 abziehen 

FC26F0 4E75 

rts 



FC26F2 5489 

addq.1 

#2,AI 

Zeiger von A* auf B-Register 

FC26F4 

4E75 

rts 







** rcvint, RS 232 Receiver Interrupt 

FC26F6 

48E7C0E0 

movem.1 

D0-D1/A0-A2,•(A7) 

Register retten 

FC26FA 

41F900000C54 

lea 

$C54,A0 

Zeiger auf RS 232 iorec 

FC2700 

45F9FFFFFA01 

lea 

SFFFFFA01,A2 

Adresse HFP 

FC2706 

116A002A001C 

move.b 

42(A2),28(A0) 

Receiver Status Register merken 

FC270C 

102A002E 

move.b 

46(A2),D0 

empfangenes Byte lesen 

FC2710 

082800000020 

btst 

#0,32(A0) 

XON/XOFF-Hodus? 

FC2716 

671A 

beq 

SFC2732 

nein 

FC2718 

0C000013 

cmp.b 

#S13,D0 

XOFF empfangen? 

FC271C 

6608 

bne 

SFC2726 

nein 

FC271E 

117CFFFF001F 

move.b 

#-1,31(AO) 

Flag für XOFF setzen 

FC2724 

6062 

bra 

SFC2788 


FC2726 

0C000011 

cmp.b 

#S11,00 

XON empfangen? 

FC272A 

6606 

bne 

SFC2732 

nein 

FC272C 

4228001F 

clr.b 

31(A0) 

Flag für XOFF löschen 

FC2730 

604C 

bra 

SFC277E 


FC2732 

32280008 

move.w 

8(A0),D1 

Tail Index holen 

FC2736 

6100 

bsr 

SFC28EA 

wrap, Index erhöhen 

FC273A 

B2680006 

cmp.w 

6(A0),D1 

Empfängerpuffer voll? 

FC273E 

6748 

beq 

SFC2788 

ja, Zeichen ignorieren 

FC2744 

4A280020 

tst.b 

32(A0) 

XON/XOFF oder CTS/RTS? 
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FC2748 673E 

beq 

SFC2788 

nein 

FC274A 30280008 

move.w 

8(A0),D0 

Tail Index 

FC274E 90680006 

sub.w 

6(A0),D0 

minus Head Index 

FC2752 6A04 

bpi 

SFC2758 

gleich Pufferinhalt 

FC2754 D0680004 

add.w 

4(A0),D0 

wenn negativ plus Puffergröße 

FC2758 B068000C 

cmp.w 

12(A0),00 

gleich High Water Hark? 

FC275C 602A 

blt 

SFC2788 

nein 

FC275E 4A28001E 

tst.b 

30(A0) 

XOFF schon gesendet? 

FC2762 6624 

bne 

$FC2788 

ja 

FC2764 117CFFFF001E 

move.b 

#• 1,30(A0) 

Flag für XOFF setzen 

FC276A 082800000020 

btst 

#0,32(A0) 

XON/XOFF-Mode? 

FC2770 6606 

bne 

SFC2778 

ja 

FC2772 61000158 

bsr 

SFC28CC 

dtron, DTR auf High 

FC2776 6010 

bra 

SFC2788 


FC2778 117C00130021 

move.b 

#S13,33(A0) 

XOFF senden 

FC277E 4A2A002C 

tst.b 

44(A2) 

Transmitter-Status-Register 

FC2782 6A04 

bpi 

SFC2788 

Transmitter-Buffer noch nicht leer? 

FC2784 61000080 

bsr 

SFC2836 

RS 232 Handshake Routine 

FC2788 08AA0004000E 

bclr 

#4,14<A2) 

Interrupt Service Bit löschen 

FC278E 4CDF0703 

movem.1 

(A7)+,D0-D1/A0-A2 

Register zurückholen 

FC2792 4E73 

rte 


txrint, Transmitter Buffer Empty 




FC2794 48E7C0E0 

movem.1 

D0-D1/A0-A2,-(A7) 

Register retten 

FC2798 45F9FFFFFA01 

lea 

SFFFFFA01,A2 

Zeiger auf MFP 

FC279E 61000096 

bsr 

SFC2836 

RS 232 Handshake Routine 

FC27A2 08AA0002000E 

bclr 

#2,14(A2) 

Interrupt-Service-Bit löschen 

FC27A8 4CDF0703 

movem.1 

(A7)*,D0-D1/A0-A2 

Register zurückholen 

FC27AC 4E73 

rte 



*************************************************************** 

cts int, CTS Interrupt Routine 

FC27AE 48E7C0E0 

movem.1 

D0-D1/A0-A2,-(A7) 

Register retten 

FC27B2 41F900000C54 

lea 

SC54.A0 

Zeiger auf iorec für RS 232 

FC27B8 45F9FFFFFA01 

lea 

SFFFFFA01,A2 

Adresse HFP 

FC27BE 082800010020 

btst 

#1,32(A0) 

rsmode, CTS/RTS-Mode? 

FC27C4 6728 

beq 

SFC27EE 

nein 

FC27C6 082A00020000 

btst 

#2,(A2) 

CTS testen 

FC27CC 6614 

bne 

SFC27E2 

High? 

FC27CE 4228001F 

clr.b 

31(A0) 


FC27D2 08EA00020002 

bset 

#2,2(A2) 

CTS auf High 

FC27D8 4A2A002C 

tst.b 

44(A2) 

Transmitter-Status-Register 

FC27DC 6A10 

bpi 

SFC27EE 

Transmitter-Buffer noch nicht leer? 

FC27DE 6156 

bsr 

SFC2836 

RS232-Handshake-Routine 

FC27E0 600C 

bra 

SFC27EE 


FC27E2 117CFFFF001F 

move.b 

#• 1,31(A0) 


FC27E8 08AA00020002 

bclr 

#2,2(A2) 

CTS auf Low 

FC27EE 08AA00020010 

bclr 

#2,16(A2) 

Interrupt Service Bit löschen 

FC27F4 4CDF0703 

movem.1 

<A7)*,D0-D1/A0-A2 

Register zurückholen 

FC27F8 4E73 

rte 






rxerror, RS 232 Empfängerfehl er 

FC27FA 48E78080 

movem.1 

D0/A0,-(A7) 

Register retten 

FC27FE 41F9FFFFFA01 

lea 

SFFFFFA01,AO 

Adresse MFP 

FC2804 13E8002A00000C70 

move.b 

42(A0),SC70 

Receiver Status merken 

FC280C 1028002E 

move.b 

46(A0),00 

Datenregister lesen (Status löschen) 

FC2810 08A80003000E 

bclr 

#3,14(AO) 

Interrupt Service Bit löschen 

FC2816 4CDF0101 

movem.1 

(A7)*,00/A0 

Register zurückholen 

FC281A 4E73 

rte 






txerror, RS 232 Sendefehler 

FC281C 2F08 

move.1 

AO, (A7) 

Register retten 

FC281E 41F9FFFFFA01 

lea 

SFFFFFA01,A0 

Adresse MFP 

FC2824 13E8002C00000C71 

move.b 

44(A0),$C71 

Transmitter Status merken 
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FC282C 08A80001000E 

bclr 

#1,14(A0) 

Interrupt-Service-Bit löschen 

FC2832 205F 

move.1 

(A7)+,A0 

Register zurückholen 

FC2834 4E73 

rte 






RS232- Handshake-Routine 

FC2836 41F900000C54 

lea 

$C54,A0 

Zeiger auf iorec für RS 232 

FC283C 10280020 

move.b 

32(A0),D0 

rsmode, eingestellter Handshake 

FC2840 C028001F 

and.b 

31(A0),D0 


FC2844 6630 

bne 

SFC2876 

nichts zu tun 

FC2846 10280021 

move.b 

33(A0),D0 

XON oder XOFF senden? 

FC284A 6706 

beq 

SFC2852 

nein 

FC284C 42280021 

clr.b 

33(A0) 

Byte wieder löschen 

FC2850 6012 

bra 

SFC2864 

und Handshake-Byte senden 

FC2852 41F900000C62 

lea 

$C62,A0 

Zeiger auf iorec für RS 232 Ausgabe 

FC2858 30280006 

move.w 

6(A0),D0 

Head-Index 

FC285C B0680008 

cmp.w 

8(A0),00 

mit Tail-Index vergleichen 

FC2860 6714 

beq 

SFC2876 

Puffer leer? 

FC2862 612E 

bsr 

JFC2892 

rs232get, Zeichen aus RS 232 Puffer holen 

FC2864 4A2A002C 

tst.b 

44(A2) 

Transmitter-Status-Register 

FC2868 6AFA 

bpi 

SFC2864 

warten bis Transmitter-Buffer leer 

FC286A 13EA002C00000C71 

move.b 

44(A2),$C71 

Transmitter-Status merken 

FC2872 1540002E 

move.b 

D0,46(A2) 

Byte senden 

FC2876 4E75 

rts 


Byte in RS 232 Puffer schreiben 




FC2878 32280008 

move.w 

8(A0),D1 

Tail- Index 

FC287C 616C 

bsr 

SFC28EA 

wrap, Index erhöhen 

FC287E B2680006 

cmp.w 

6(A0),D1 

mit Head-Index vergleichen 

FC2882 67FA 

beq 

JFC287E 

Puffer voll, dann warten 

FC2884 22680000 

move.1 

<A0),A1 

Puffer-Adresse 

FC2888 13801000 

move.b 

00,(Al,D1.w) 

Byte in Puffer schreiben 

FC288C 31410008 

move.w 

Dl,8(A0) 

Tail-Index updaten 

FC2890 4E75 

rts 



*************************************************************** 

rs232get, Zeichen aus RS 232 Puffer holen 

FC2892 32280006 

move.w 

6(A0),D1 

Head-Index 

FC2896 B2680008 

cmp.w 

8(A0),D1 

mit Tail-Index vergleichen 

FC289A 67F6 

beq 

$FC2892 

Puffer leer, warten 

FC289C 614C 

bsr 

SFC28EA 

wrap, Index erhöhen 

FC289E 22680000 

move.1 

(A0),Al 

Puffer-Adresse 

FC28A2 7000 

moveq.1 

HK), DO 


FC28A4 10311000 

move.b 

(AI,01.w),00 

Zeichen aus Puffer holen 

FC28A8 31410006 

move.w 

D1,6(A0) 

Head-Index updaten 

FC28AC 4E75 

rts 



*************************************************************** 

dtroff, DTR auf Low 

FC28AE 43F9FFFF8800 

lea 

SFFFF8800.A1 

Zeiger auf Sound-Chip 

FC28B4 40E7 

move.w 

SR,-(A7) 

Status retten 

FC28B6 007C0700 

or.w 

#$700,SR 

IPL 7, Interrupts sperren 

FC28BA 12BC000E 

move.b 

#$E,(A1) 

Port A selektieren 

FC28BE 1211 

move.b 

(AI),Dl 

Daten lesen 

FC28C0 C23C00F7 

and.b 

#$F7,D1 

Bit löschen 

FC28C4 13410002 

move.b 

Dl,2(A1) 

Daten zurückschreiben 

FC28C8 460F 

move.w 

(A7)+,SR 

Status zurückholen 

FC28CA 4E75 

rts 


dtron, DTR auf High 




FC28CC 43F9FFFF8800 

lea 

$FFFF8800,A1 

Zeiger auf Sound-Chip 

FC28D2 40E7 

move.w 

SR,*(A7) 

Status retten 

FC2804 007C0700 

or.w 

#$700,SR 

IPL 7, Interrupts sperren 

FC2808 12BC000E 

move.b 

#$E,(AI) 

Port A selektieren 

FC28DC 1211 

move.b 

(AI),01 

Daten lesen 

FC28DE 00010008 

or.b 

#8,01 

Bit 3 setzen 

FC28E2 13410002 

move.b 

01,2(AI) 

Säten zurückschreiben 
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FC28E6 46DF 

move.w 

(A7)*,SR 

Status zurückholen 

FC28E8 4E75 

rts 






* wrap, Test auf wrop arround 

FC28EA 5241 

addq.w 

#1,01 

Index erhöhen 

FC28EC B2680004 

cmp.w 

4(A0),D1 

gleich Puffergröße? 

FC28F0 6502 

bcs 

SFC28F4 

nein 

FC28F2 7200 

moveq.1 

#0,01 

sonst bei Pufferstart beginnen 

FC28F4 4E75 

rts 






* Iorec 

FC28F6 322F0004 

move.w 

4(A7),D1 

Device-Nummer 

FC28FA E581 

asl.l 

#2,Dl 

als Langwort Index 

FC28FC 203B1004 

move.1 

$FC2902(PC,Dl.w),00 

Adresse aus Tabelle holen 

FC2900 4E75 

rts 






* Tabelle der iorec 

FC2902 00000C54 

de. 1 

$C54 

RS 232 

FC2906 00000C76 

de. 1 

$C76 

Tastatur 

FC290A 00000084 

de. 1 

SO 84 

MIDI 




* rsconf, RS 232 konfigurieren 

FC290E 007C0700 

or.w 

#S700,SR 

IPL 7, Interrupts sperren 

FC2912 41F900000C54 

lea 

SC54.A0 

Adresse iorec für RS 232 

FC2918 43F9FFFFFA01 

lea 

SFFFFFA01,A1 

Adresse des HFP 

FC291E 0F490028 

movep.1 

S28(A1),D7 

ucr, rsr, tsr und scr retten 

FC2922 4A6F0006 

tst.w 

6(A7) 

Modus 

FC2926 6B18 

bmi 

SFC2940 

negativ, nicht neu setzen 

FC2928 116F00070020 

move.b 

7<A7),32(A0) 

rsmode neu setzen 

FC292E 10280020 

move.b 

32(A0),D0 

rsmode holen 

FC2932 670C 

beq 

SFC2940 

kein Handshake? 

FC2934 C03C00FD 

and.b 

#SFD,00 

Bit 1 löschen 

FC2938 6706 

beq 

SFC2940 

kein RTS/CTS? 

FC293A 117C00010020 

move.b 

#1,32(A0) 

rsmode nur auf RTS/CTS 

FC2940 4A6F0004 

tst.w 

4(A 7) 

Baudrate 

FC2944 6B34 

bmi 

SFC297A 

nicht setzen? 

FC2946 7000 

moveq.1 

#0,00 


FC2948 1340002A 

move.b 

D0,42(A1) 

Empfänger disablen 

FC294C 1340002C 

move.b 

D0,44(A1) 

Sender disablen 

FC2950 322F0004 

move.w 

4(A7),D1 

neue Baudrate holen 

FC2954 45F900FC29AE 

lea 

SFC29AE.A2 

Tabelle der Timer-Werte, Control-Register 

FC295A 10321000 

move.b 

(A2,Dl.w),D0 

Wert holen 

FC295E 45F900FC29BE 

lea 

SFC29BE,A2 

Tabelle der Timer-Werte, Daten-Register 

FC2964 14321000 

move.b 

(A2,0l.w),D2 

Wert holen 

FC2968 2200 

move.1 

00,01 


FC296A 7003 

moveq.1 

#3,DO 

Zeiger auf Timer 0 

FC296C 6100FC42 

bsr 

SFC25B0 

Timer D für neue Baudrate setzen 

FC2970 7001 

moveq.1 

#1,00 


FC2972 1340002A 

move.b 

D0,42(A1) 

Empfänger enablen 

FC2976 1340002C 

move.b 

00,44(A1) 

Sender enablen 

FC297A 4A6F0008 

tst.w 

8(A7) 

ucr setzen? 

FC297E 6B06 

bmi 

SFC2986 

nein 

FC2980 136F00090028 

move.b 

9(A7),40(A1) 

neuer ucr Wert 

FC2986 4A6F000A 

tst.w 

10(A7) 

rsr setzen? 

FC298A 6B06 

bmi 

SFC2992 

nein 

FC298C 136F000B002A 

move.b 

11(A7),42(A1) 

neuer rsr Wert 

FC2992 4A6F000C 

tst.w 

12 (A7) 

tsr setzen? 

FC2996 6B06 

bmi 

SF C299E 

nein 

FC2998 136F000D002C 

move.b 

13 (A7),44(A1) 

neuer tsr Wert 

FC299E 4A6F000E 

tst.w 

14 (A7) 

scr setzen 

FC29A2 6B06 

bmi 

SF C29AA 

nein 

FC29A4 136F000F0026 

move.b 

15 (A7),38(A1) 

neuer scr Wert 
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FC29AA 2007 ntove.l D7 ,D0 alter Wert der Control-Register 

FC29AC 4E75 rts 

*************************************************************** Timer-Werte für RS 232 Baudrate 


FC29AE 

0101010101010101 

dc.b 

1,1,1,1.1,1,1,1 

Control-Register 

FC29B6 

0101010101010202 

dc.b 

1,1,1.1,1,1,2,2 

1 = /4, 2 = /10 

FC29BE 

01020405080A0B10 

dc.b 

1,2,4,5,8,10,11,16 

Datenregister 

FC29C6 

204060808FAF4060 

dc.b 

32,64,96,128,143,175,64, 

,96 

*************************************************************** 

midikey, Tastatur- und MIDI - Interrupt 

FC29CE 

48E7F0F4 

movem.1 

D0-D3/A0-A3/A5,-(A7) 

Register retten 

FC29D2 

4BF900000000 

lea 

$0,A5 

A5 löschen 

FC29D8 

246D0E2E 

move.1 

SE2ECA5),A2 

mbufrec, MIDI 

FC29DC 

4E92 

jsr 

<A2) 

Interrupt von MIDI-ACIA? 

FC29DE 

246D0E32 

move.1 

SE32(A5),A2 

kbufrec, Keyboard 

FC29E2 

4E92 

jsr 

(A2) 

Interrupt von Keyboard? 

FC29E4 

08390004FFFFFA01 

btst 

#4,$FFFFFA01 

steht Interrupt noch an? 

FC29EC 

67EA 

beq 

$FC2908 

ja, verarbeiten 

FC29EE 

08B90006FFFFFA11 

bclr 

#6,$FFFFFA11 

Interrupt-Service-Bit löschen 

FC29F6 

4CDF2F0F 

movem.1 

(A7)+,D0-D3/A0-A3/A5 

Register zurückholen 

FC29FA 

4E73 

rte 



ft************************************************************** 

midisys, MIDI - Interrupt 

FC29FC 

41ED0D84 

lea 

$D84(A5),A0 

iorec für MIDI 

FC2A00 

43F9FFFFFC04 

lea 

SFFFFFC04,A1 

MIDI ACIA Control 

FC2A06 

24600E1A 

move.1 

$E1A(A5),A2 

MIDI Error-Routine 

FC2A0A 

600E 

bra 

SFC2A1A 

ikbdsys, Keyboard Interrupt 





FC2A0C 

41ED0C76 

lea 

$C76(A5),A0 

iorec für Keyboard 

FC2A10 

43F9FFFFFC00 

lea 

$FFFFFC00,A1 

Keyboard ACIA Control 

FC2A16 

24600E16 

move.1 

$E16(A5),A2 

Keyboard Error Routine 

FC2A1A 

14290000 

move.b 

(Al),D2 

ACIA-Status holen 

FC2A1E 

08020007 

btst 

#7,D2 

Interrupt Request? 

FC2A22 

671C 

beq 

SFC2A40 

nein 

FC2A24 

08020000 

btst 

#0,02 

Receiver Buffer full? 

FC2A28 

670A 

beq 

SFC2A34 

nein 

FC2A2A 

48E720E0 

movem.1 

D2/A0-A2,-(A7) 

Register retten 

FC2A2E 

6112 

bsr 

SFC2A42 

arcvint, Byte holen 

FC2A30 

4CDF0704 

movem.1 

(A7)+,D2/A0-A2 

Register zurück 

FC2A34 

02020020 

and.b 

#$20,02 

Receiver Overrun? 

FC2A38 

6706 

beq 

SFC2A40 

nein 

FC2A3A 

10290002 

move.b 

2(A1),00 

Daten nochmal lesen, Status löschen 

FC2A3E 

4ED2 

jmp 

(A2) 

Error-Routine ausführen 

FC2A40 

4E75 

rts 


arcvint, Byte von ACIA holen 





FC2A42 

10290002 

move.b 

2<AI) ,00 

Daten von ACIA holen 

FC2A46 

B1FC00000C76 

cmp. 1 

#$C76,A0 

Keyboard-ACIA? 

FC2A4C 

66000440 

bne 

SFC2E8E 

nein 

FC2A50 

4A2D0E36 

tst.b 

$E36(A5) 

Keyboard State 

FC2A54 

6660 

bne 

SFC2AB6 


FC2A56 

0C0000F6 

cmp.b 

#$F6,00 

Tastendruck? 

FC2A5A 

65000100 

bcs 

SFC2B5C 

ja 

FC2A5E 

040000F6 

sub.b 

#$F6,D0 

Offset abziehen 

FC2A62 

0280000000FF 

and. 1 

#$FF,00 


FC2A68 

47F900FC2AA2 

lea 

SFC2AA2,A3 

Zeiger auf IKBD Code-Tabelle 

FC2A6E 

1B7300000E36 

move.b 

(A3,D0.w),$E36(A5) 

Keyboard-State merken 

FC2A74 

47F900FC2AAC 

lea 

SFC2AAC,A3 

Zeiger auf IKBD-Längen-Tabelle 

FC2A7A 

1B7300000E37 

move.b 

<A3,D0.w),$E37(A5) 

IKBD Index 

FC2A80 

064000F6 

add.u 

#$F6,D0 

Offset wieder addieren 

FC2A84 

0C0000F8 

cmp.b 

#$F8,D0 

Mouse Position Record? 

FC2A88 

6D0C 

blt 

SFC2A96 

nein 

FC2A8A 

0C0000FB 

cmp.b 

#$FB,D0 

Mouse Position Record? 
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FC2A8E 6E06 

bgt 

SFC2A96 

nein 

FC2A90 1B400E44 

move.b 

D0,$E44(A5) 

Mouse Position merken 

FC2A94 4E75 

rts 



FC2A96 0C0000FD 

cmp.b 

#$FD,D0 

Joystick Record? 

FC2A9A 6004 

blt 

SFC2AA0 

nein 

FC2A9C 1B400E4D 

move.b 

D0,$E4D(A5) 

Joystick-Daten merken 

FC2AA0 4E75 

rts 



*************************************************************** 

IKBD Parameter 

FC2AA2 01020303030304050607 

dc.b 

1,2,3,3,3,3,4,5,6,7 

Status-Code für $F6 bis $FF 

FC2AAC 07050202020206020101 

dc.b 

7,5,2,2,2,2,6,2,1,1 

Längen -1 für $F6 bis $FF 

FC2AB6 0C2D00060E36 

cmp.b 

#6,$E36(A5) 

Joystick Record? 

FC2ABC 64000084 

bcc 

SFC2B42 

ja 

FC2AC0 45F900FC2B06 

lea 

$FC2B06,A2 

Zeiger auf IKBD Parametertabelle 

FC2AC6 7400 

moveq.1 

#0,02 


FC2AC8 142D0E36 

move.b 

$E36(A5),D2 

Keyboard-State 

FC2ACC 5302 

subq.b 

#1,D2 

1-5 -> 0-4 

FC2ACE E342 

asl .w 

#1,02 

mal 2 

FC2AD0 D42D0E36 

add.b 

$E36(A5),D2 

plus Keyboard-State 

FC2AD4 5302 

subq.b 

#1 ,D2 

minus 1 

FC2AD6 E542 

asl .w 

#2,02 

mal 4 

FC2AD8 20722000 

move.1 

(A2,D2.w),A0 

IKBD Record Zeiger 

FC2ADC 22722004 

move.1 

4(A2,D2.w),Al 

IKBD Index Basis 

FC2AE0 24722008 

move.1 

8(A2,D2.w),A2 

IKBD Interrupt-Routine 

FC2AE4 2452 

move.1 

(A2),A2 

Interrupt-Vektor holen 

FC2AE6 7400 

moveq.1 

#0,D2 


FC2AE8 142D0E37 

move.b 

JE37(A5),D2 

IKBD Index holen 

FC2AEC 93C2 

sub. 1 

02,AI 

minus Basis 

FC2AEE 1280 

move.b 

00,(AI) 


FC2AF0 532D0E37 

subq.b 

#1 ,$E37(A5) 

IKBD Index minus 1 

FC2AF4 4A2D0E37 

tst.b 

SE37(A5) 

Index testen 

FC2AF8 660A 

bne 

SFC2B04 


FC2AFA 2F08 

move.1 

A0,-(A7) 

Recordzeiger übergeben 

FC2AFC 4E92 

jsr 

<A2) 

Interrupt-Routine ausführen 

FC2AFE 584F 

addq.w 

#4,A7 

Stackpointer korrigieren 

FC2B00 422D0E36 

clr.b 

$E36(A5) 

IKBD-State löschen 

FC2B04 4E75 

rts 



************************************** 

************************* 

Parametertabelle für IKBD 

FC2B06 00000E38 

de. 1 

$E38 


FC2B0A 00000E3F 

de. 1 

SE3F 


FC2B0E 00000E1E 

de. 1 

SE1E 


FC2B12 00000E3F 

de. 1 

$E3F 


FC2B16 00000E44 

de. 1 

SE44 


FC2B1A 00000E22 

dc.l 

SE22 


FC2B1E OOOOOE44 

de. 1 

*E44 


FC2B22 00000E47 

dc.l 

SE47 


FC2B26 00000E22 

dc.l 

$E22 


FC2B2A 00000E47 

dc.l 

SE47 


FC2B2E 00000E4D 

dc.l 

JE4D 


FC2B32 00000E26 

dc.l 

$E26 


FC2B36 00000E4D 

dc.l 

$E4D 


FC2B3A 00000E4F 

dc.l 

$E4F 


FC2B3E 00000E2A 

dc.l 

JE2A 


FC2B42 223C00000E4E 

move.1 

#$E4E,D1 


FC2B48 D22D0E36 

add.b 

$E36(A5),D1 

Joystick 0 und 1 

FC2B4C 5D01 

subq.b 

#6,01 


FC2B4E 2441 

move.1 

01, A2 
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FC2B50 1480 

move.b 

00,(A2) 


FC2852 246D0E2A 

move.1 

SE2A(A5),A2 

Joystick Interrupt Routine 

FC2B56 41ED0E4D 

lea 

SE4D(A5),A0 

Adresse Joystick Daten 

FC2B5A 609E 

bra 

SFC2AFA 





** Tastendruck verarbeiten 

FC2B5C 122D0E61 

move.b 

$E61(A5),D1 

Shift-Status 

FC2B60 0C00002A 

cmp.b 

#$2A,D0 

linke Shift-Taste gedrückt? 

FC2B64 6606 

bne 

JFC2B6C 

nein 

FC2B66 08C10001 

bset 

#1,01 

Bit für linke Shift-Taste setzen 

FC2B6A 6074 

bra 

SFC2BE0 


FC2B6C 0C0000AA 

cmp.b 

#$AA,00 

linke Shift-Taste losgelassen? 

FC2B70 6606 

bne 

SFC2B78 

nein 

FC2B72 08810001 

bclr 

#1 ,D1 

Bit für linke Shift-Taste löschen 

FC2B76 6068 

bra 

SFC2BE0 


FC2B78 0C000036 

cmp.b 

#$36,00 

rechte Shift-Taste gedrückt? 

FC2B7C 6606 

bne 

SFC2B84 

nein 

FC2B7E 08C10000 

bset 

#0,01 

Bit für rechte Shift-Taste setzen 

FC2B82 605C 

bra 

SFC2BE0 


FC2B84 0C0000B6 

cmp.b 

#$B6,D0 

rechte Shift-Taste losgelassen? 

FC2B88 6606 

bne 

SFC2B90 

nein 

FC2B8A 08810000 

bclr 

#0,01 

Bit für rechte Shift-Taste löschen 

FC2B8E 6050 

bra 

SFC2BE0 


FC2B90 0C00001D 

cmp.b 

#$10,DO 

CTRL-Taste gedrückt? 

FC2B94 6606 

bne 

1FC2B9C 

nein 

FC2B96 08C10002 

bset 

#2,01 

Bit für CTRL-Taste setzen 

FC2B9A 6044 

bra 

SFC2BE0 


FC2B9C 0C00009D 

cmp.b 

#$90,00 

CTRL-Taste losgelassen? 

FC2BA0 6606 

bne 

$FC2BA8 

nein 

FC2BA2 08810002 

bclr 

#2,01 

Bit für CTRL-Taste löschen 

FC2BA6 6038 

bra 

$FC2BE0 


FC2BA8 0C000038 

cmp.b 

#$38,00 

ALT-Taste gedrückt? 

FC28AC 6606 

bne 

$FC2BB4 

nein 

FC2BAE 08C10003 

bset 

#3,Dl 

Bit für ALT-Taste setzen 

FC2BB2 602C 

bra 

$FC2BE0 


FC2BB4 0C0000B8 

cmp.b 

#$B8,D0 

ALT-Taste losgelassen? 

FC2BB8 6606 

bne 

SFC2BC0 

nein 

FC2BBA 08810003 

bclr 

#3,Dl 

Bit für ALT-Taste löschen 

FC2BBE 6020 

bra 

$FC2BE0 


FC2BC0 0C00003A 

cmp.b 

#$3A,D0 

CAPS LOCK gedrückt? 

FC2BC4 6620 

bne 

$FC2BE6 

nein 

FC2BC6 082000000484 

btst 

#0,$484(A5) 

conterm. Tastenklick enabled? 

FC2BCC 670E 

beq 

$FC2BDC 

nein 

FC2BCE 2B7C00FC323A0E8A 

move.l 

#$FC323A,$E8A(A5) 

Adresse Sound-Tabelle Tastenklick 

FC2BD6 1B7C00000E8E 

move.b 

#0,$E8E(A5) 

Sound starten 

FC2BDC 08410004 

bchg 

#4,Dl 

CAPS LOCK Status toggeln 

FC2BE0 1B410E61 

move.b 

Dl,$E61(A5) 

ermittelten Shift-Status merken 

FC2BE4 4E75 

rts 



FC2BE6 08000007 

btst 

#7,00 

wurde Taste losgelassen? 

FC2BEA 662A 

bne 

$FC2C16 

ja 

FC2BEC 4A2D0E7F 

tst.b 

$E7F(A5) 

Repeat? 

FC2BF0 6616 

bne 

$FC2C08 

ja 

FC2BF2 1B400E7F 

move.b 

D0,$E7F(A5) 

Tastencode für Repeat merken 

FC2BF6 1B7900000E820E80 

move.b 

$E82,$E80(A5) 

Verzögerung 1 

FC2BFE 1B7900000E830E81 

move.b 

$E83,$E81(A5) 

Verzögerung 2 

FC2C06 603A 

bra 

SFC2C42 


FC2C08 1B7C00000E80 

move.b 

#0,$E80(A5) 

Zähler für Verzögerung 1 löschen 

FC2C0E 1B7C00000E81 

move.b 

#0,$E81(A5) 

Zähler für Verzögerung 2 löschen 
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FC2C14 602C 

bra 

SFC2C42 


FC2C16 4A2D0E7F 

tst.b 

$E7F<A5) 

Taste für Repeat? 

FC2C1A 670E 

beq 

SFC2C2A 

nein 

FC2C1C 7200 

moveq.1 

#0,01 


FC2C1E 1B410E7F 

move.b 

Dl,$E7F(A5) 

Tastencode für Repeat löschen 

FC2C22 1B410E80 

move.b 

D1,$E80(A5) 

Zähler für Verzögerung 1 löschen 

FC2C26 1B410E81 

move.b 

D1,SE81(A5) 

Zähler für Verzögerung 2 löschen 

FC2C2A 0C0000C7 

cmp.b 

#$C7,D0 

HOME-Taste losgelassen? 

FC2C2E 6708 

beq 

1FC2C38 

ja 

FC2C30 0C0000D2 

cmp.b 

#$02,00 

INSERT-Taste losgelassen? 

FC2C34 66000256 

bne 

$FC2E8C 

nein 

FC2C38 082D00030E61 

btst 

#3,$E61(A5) 

ALT-Taste noch gedrückt? 

FC2C3E 6700024C 

beq 

SFC2E8C 

nein 

FC2C42 082D00000484 

btst 

#0,$484(A5) 

conterm, Tastenklick enabled? 

FC2C48 670E 

beq 

SFC2C58 

nein 

FC2C4A 2B7C00FC323A0E8A 

move.l 

#$FC323A,$E8A(A5) 

Adresse Sound-Tabelle für Tastenklick 

FC2C52 1B7C00000E8E 

move.b 

#0,SE8E(A5) 

Sound starten 

FC2C58 2F08 

move.1 

A0,-(A7) 

iorec für Keyboard merken 

FC2C5A 7200 

moveq.1 

#0,01 


FC2C5C 1200 

move.b 

00,01 

Scancode nach 01 

FC2C5E 206D0E62 

move.1 

SE62(A5),A0 

Adresse der Standard-Tastatur-Tabelle 

FC2C62 0240007F 

and.w 

#$7F,D0 

Bit für Losgelassen löschen 

FC2C66 082D00040E61 

btst 

#4,$E61(A5) 

CAPS LOCK aktiv? 

FC2C6C 6704 

beq 

SFC2C72 

nein 

FC2C6E 20600E6A 

move.1 

$E6A(A5),A0 

Adresse der CAPS Lock Tastatur-Tabelle 

FC2C72 082000000E61 

btst 

#0,$E61<A5) 

rechte Shift-Taste gedrückt? 

FC2C78 6608 

bne 

SFC2C82 

ja 

FC2C7A 082D00010E61 

btst 

#1,$E61(A5) 

linke Shift-Taste gedrückt 

FC2C80 671A 

beq 

SFC2C9C 

nein 

FC2C82 0C00003B 

cmp.b 

#S3B,D0 

Funkt ionstaste? (Fl) 

FC2C86 6510 

bcs 

SFC2C98 

nein 

FC2C88 0C000044 

cmp.b 

#$44,00 

Funkt ionstaste? (F10) 

FC2C8C 620A 

bhi 

$FC2C98 

nein 

FC2C8E 06410019 

add.w 

#$19,Dl 

Offset nach GSX-Standard addieren 

FC2C92 7000 

moveq.1 

#0,D0 

ASCII-Code gleich null 

FC2C94 600001B2 

bra 

$FC2E48 


FC2C98 206D0E66 

move.1 

$E66(A5),A0 

Adresse der Shift-Tastatur-Tabelle 

FC2C9C 10300000 

move.b 

(A0,D0.w),D0 

ASCII-Code aus Tabelle holen 

FC2CA0 082D00020E61 

btst 

#2,$E61(A5) 

CTRL-Taste gedrückt? 

FC2CA6 6760 

beq 

$FC2008 

nein 

FC2CA8 OCOOOOOO 

cmp.b 

#13,DO 

CTRL Carriage Return? 

FC2CAC 6604 

bne 

$FC2CB2 

nein 

FC2CAE 700A 

moveq.1 

#10,00 

in Line Feed umwandeln 

FC2CB0 672A 

beq 

$FC2CDC 


FC2CB2 0C010047 

cmp.b 

#$47,01 

CTRL HOME? 

FC2CB6 6608 

bne 

$FC2CC0 

nein 

FC2CB8 06410030 

add.w 

#$30,01 

Offset nach GSX addieren 

FC2CBC 6000018A 

bra 

$FC2E48 


FC2CC0 0C01004B 

cmp.b 

#$4B,01 

CTRL Cursor links? 

FC2CC4 6608 

bne 

$FC2CCE 

nein 

FC2CC6 7273 

moveq.1 

#$73,01 

GSX Standard 

FC2CC8 7000 

moveq.1 

#0,DO 

ASCII-Code Null 

FC2CCA 6000017C 

bra 

$FC2E48 


FC2CCE 0C01004D 

cmp.b 

#$4D,D1 

CTRL Cursor rechts? 

FC2C02 6608 

bne 

$FC2CDC 

nein 

FC2CD4 7274 

moveq.1 

#$74,01 

GSX Standard 

FC2CD6 7000 

moveq.1 

#0,00 

ASCII-Code Null 
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FC2C08 6000016E 

bra 

SFC2E48 


FC2CDC 0C000032 

cmp.b 

#$32,DO 

CTRL M? 

FC2CE0 6606 

bne 

SFC2CE8 

nein 

FC2CE2 7000 

moveq.1 

#O,D0 

ASCII-Code Null 

FC2CE4 60000162 

bra 

SFC2E48 


FC2CE8 0C000036 

cmp.b 

#$36,DO 

CTRL Shift? 

FC2CEC 6606 

bne 

$FC2CF4 

nein 

FC2CEE 701E 

moveq.1 

#$1E,D0 

ASCII-Code RS 

FC2CF0 60000156 

bra 

$FC2E48 


FC2CF4 0C00002D 

cmp.b 

#$2D,D0 

CTRL C? 

FC2CF8 6606 

bne 

$FC2D00 

nein 

FC2CFA 701F 

moveq.1 

#$1F,D0 

ASCII-Code US 

FC2CFC 6000014A 

bra 

$FC2E48 


FC2D00 0240001F 

and.w 

#$1F,D0 

Code in CTRL-Code umwandeln 

FC2D04 60000142 

bra 

$FC2E48 


FC2D08 082D00030E61 

btst 

#3,$E61(A5) 

ALT-Taste gedrückt? 

FC2D0E 67000138 

beq 

$FC2E48 

nein 

FC2D12 0C01001A 

cmp.b 

#$1A,D1 

Taste 'Ü*? 

FC2D16 6618 

bne 

$FC2D30 

nein 

FC2D18 103C0040 

move.b 

#$40,DO 

'<a' 

FC2D1C 142D0E61 

move.b 

$E61(A5),D2 

Shift-Status holen 

FC2D20 02020003 

and.b 

#3,D2 

eine der beiden Shift-Tasten gedrückt? 

FC2D24 67000122 

beq 

$FC2E48 

nein 

FC2D28 103C005C 

move.b 

#$5C,D0 

•V 

FC2D2C 6000011A 

bra 

$FC2E48 


FC2D30 0C010027 

cmp.b 

#$27,Dl 

Taste •Ö'? 

FC2D34 6618 

bne 

$FC2D4E 

nein 

FC2036 103C005B 

move.b 

#$5B,D0 

'[' 

FC2D3A 142D0E61 

move.b 

$E61(A5),D2 

Shift-Status holen 

FC2D3E 02020003 

and.b 

#3,D2 

eine der beiden Shift-Tasten gedrückt? 

FC2D42 67000104 

beq 

$FC2E48 

nein 

FC2D46 103C007B 

move.b 

#$7B,D0 


FC2D4A 600000FC 

bra 

$FC2E48 


FC2D4E 0C010028 

cmp.b 

#$28,Dl 

Taste •Ä'? 

FC2D52 6618 

bne 

$FC2D6C 

nein 

FC2D54 103C005D 

move.b 

#$5D,D0 

']' 

FC2D58 142D0E61 

move.b 

$E61(A5),D2 

Shift-Status holen 

FC2D5C 02020003 

and.b 

#3,02 

eine der beiden Shift-Tasten gedrückt? 

FC2060 670000E6 

beq 

$FC2E48 

nein 

FC2D64 103C007D 

move.b 

#$7D,D0 

')' 

FC2D68 600000DE 

bra 

$FC2E48 


FC2D6C 0C010062 

cmp.b 

#$62,Dl 

ALT HELP? 

FC2D70 660A 

bne 

$FC2D7C 

nein 

FC2D72 526O04EE 

addq.w 

#1,$4EE(A5) 

dumpfig für Hardcopy 

FC2D76 205F 

move.1 

(A7)+,A0 

iorec für Keyboard zurückholen 

FC2D78 60000112 

bra 

$FC2E8C 


FC2D7C 45F900FC2EFA 

lea 

$FC2EFA,A2 

Zeiger auf Maus-Scancode-Tabelle 

FC2D82 7403 

moveq.1 

#3,D2 

4 Werte testen 

FC2D84 B2322000 

cmp.b 

(A2,D2.w),D1 

Wert gefunden? 

FC2D88 6700012C 

beq 

SFC2EB6 

ja 

FC2D8C 51CAFFF6 

dbra 

D2,$FC2D84 

nächster Wert 

FC2D90 0C010048 

cmp.b 

#$48,Dl 

Cursor hoch? 

FC2D94 661C 

bne 

$FC2DB2 

nein 

FC2D96 123C0000 

move.b 

#0,D1 

X-Offset für Cursor hoch 

FC2D9A 143CFFF8 

move.b 

#-8,D2 

Y-Offset für Cursor hoch 

FC2D9E 102D0E61 

move.b 

$E61(A5),D0 

Shift-Status holen 
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FC2DA2 02000003 

and.b 

#3,00 

eine der beiden Shift-Tasten gedrückt? 

FC2DA6 6700012C 

beq 

SFC2ED4 

nein 

FC2DAA 143CFFFF 

move.b 

#-1,D2 

Y-Offset, nur ein Pixel 

FC2DAE 60000124 

bra 

SFC2ED4 


FC2DB2 0C01004B 

cmp.b 

#$4B,D1 

Cursor links? 

FC2DB6 661C 

bne 

SFC2004 

nein 

FC2DB8 143C0000 

move.b 

#0,D2 

Y-Offset für Cursor links 

FC2DBC 123CFFF8 

move.b 

#•8,Dl 

X-Offset für Cursor links 

FC2DC0 102D0E61 

move.b 

$E61(A5),D0 

Shift-Status holen 

FC2DC4 02000003 

and.b 

#3,00 

eine der beiden Shift-Tasten gedrückt? 

FC2DC8 6700010A 

beq 

SFC2ED4 

nein 

FC2DCC 123CFFFF 

move.b 

#-1,D1 

X-Offset, nur ein Pixel links 

FC2DD0 60000102 

bra 

SFC2ED4 


FC2DD4 0C01004D 

cmp.b 

#$4D,D1 

Cursor rechts? 

FC2DD8 661C 

bne 

SFC2DF6 

nein 

FC2DDA 123C0008 

move.b 

#8,Dl 

X-Offset für Cursor rechts 

FC2DDE 143C0000 

move.b 

#0,02 

Y-Offset für Cursor links 

FC2DE2 102D0E61 

move.b 

$E61(A5),D0 

Shift-Status holen 

FC2DE6 02000003 

and.b 

#3,DO 

eine der beiden Shift-Tasten gedrückt? 

FC2DEA 670000E8 

beq 

SFC2ED4 

nein 

FC2DEE 123C0001 

move.b 

#1 ,D1 

X-Offset, nur ein Pixel rechts 

FC2DF2 600000E0 

bra 

SFC2ED4 


FC2DF6 0C010050 

cmp.b 

#$50,01 

Cursor down? 

FC2DFA 661C 

bne 

SFC2E18 

nein 

FC2DFC 123C0000 

move.b 

#0,01 

X-Offset für Cursor down 

FC2E00 143C0008 

move.b 

#8,02 

Y-Offset für Cursor down 

FC2E04 102D0E61 

move.b 

$E61(A5),D0 

Shift-Status holen 

FC2E08 02000003 

and.b 

#3,00 

eine der beiden Shift-Tasten gedrückt? 

FC2E0C 670000C6 

beq 

SFC2ED4 

nein 

FC2E10 143C0001 

move.b 

#1,02 

Y-Offset, nur ein Pixel down 

FC2E14 600000BE 

bra 

SFC2ED4 


FC2E18 0C010002 

cmp.b 

#2,Dl 

•1'? 

FC2E1C 650C 

bcs 

SFC2E2A 

kleiner 

FC2E1E 0C010000 

cmp.b 

#SD,D1 

' = •? 

FC2E22 6206 

bhi 

SFC2E2A 

größer 

FC2E24 06010076 

add.b 

#$76,Dl 

Offset addieren 

FC2E28 600C 

bra 

$FC2E36 


FC2E2A 0C000041 

cmp.b 

#$41,DO 

•A* 

FC2E2E 650A 

bcs 

$FC2E3A 

kleiner? 

FC2E30 0C00005A 

cmp.b 

#$5A,D0 

•Z* 

FC2E34 6204 

bhi 

$FC2E3A 

größer? 

FC2E36 7000 

moveq.1 

#0,00 

ASCII-Code Null 

FC2E38 600E 

bra 

$FC2E48 


FC2E3A 0C000061 

cmp.b 

#$61,DO 

•a' 

FC2E3E 6508 

bcs 

$FC2E48 

kleiner? 

FC2E40 0C00007A 

cmp.b 

#$7A,D0 

•z' 

FC2E44 6202 

bhi 

$FC2E48 

größer? 

FC2E46 60EE 

bra 

$FC2E36 


FC2E48 E141 

asl .w 

#8,01 

Scan-Code nach Bit 8-15 

FC2E4A D041 

add.w 

Dl,DO 

zu ASCII-Code addieren 

FC2E4C 205F 

move.1 

(A7)+,A0 

iorec füe Keyboard 

FC2E4E 32280008 

move.w 

8(A0),D1 

Tail- Index 

FC2E52 5841 

addq.w 

#4,01 

plus 4 

FC2E54 B2680004 

cmp.w 

4(A0),D1 

Pufferende erreicht? 

FC2E58 6502 

bcs 

$FC2E5C 

nein 

FC2E5A 7200 

moveq.1 

#0,D1 

wieder am Pufferanfang beginnen 

FC2E5C B2680006 

cmp.w 

6(A0),D1 

Puffer voll? 

FC2E60 672A 

beq 

$FC2E8C 

ja, Daten ignorieren 

FC2E62 24680000 

move.1 

(A0),A2 

Puffer-Adresse holen 
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FC2E66 4840 

swap 

DO 

ASCII- und Scan-Code in oberes Wort 

FC2E68 303C0000 

move.w 

#0,00 


FC2E6C 102D0E61 

move.b 

$E61(A5),D0 

Shift-Status 

FC2E70 4840 

swap 

DO 

in oberes Wort 

FC2E72 E188 

Isl.L 

#8,00 

Shift-Status nach Bit 16-23 

FC2E74 E048 

Isr.w 

#8,00 

ASCII-Code nach Bit 0-7 

FC2E76 082D00030484 

btst 

#3,S484(A5) 

conterm, Shift-Status übernehmen? 

FC2E7C 6606 

bne 

SFC2E84 

ja 

FC2E7E 028000FFFFFF 

and. 1 

#$FFFFFF,D0 

Shift-Status löschen 

FC2E84 25801000 

move.1 

00,(A2,D1.W) 

Daten in Keyboard-Puffer 

FC2E88 31410008 

move.w 

01,8(A0) 

Tail•Index updaten 

FC2E8C 4E75 

rts 


midibyte 




FC2E8E 246D0E12 

move.1 

SE12(A5),A2 

Zeiger auf MIDI - Interrupt-Handler 

FC2E92 4ED2 

jmp 

(A2) 

Routine ausführen 




sysmidi 

FC2E94 32280008 

move.w 

8(A0),01 

Tail-1ndex 

FC2E98 5241 

addq.w 

#1,01 

erhöhen 

FC2E9A B2680004 

cmp.w 

4(A0),D1 

Pufferende erreicht? 

FC2E9E 6502 

bcs 

SFC2EA2 

nein 

FC2EA0 7200 

moveq.1 

#0,01 

Zeiger wieder auf Pufferstart 

FC2EA2 B2680006 

cmp.w 

6(A0),01 

Head gleich Tai l? 

FC2EA6 670C 

beq 

SFC2EB4 

ja, Puffer voll 

FC2EA8 24680000 

move.1 

(A0),A2 

Pufferadresse 

FC2EAC 15801000 

move.b 

00,(A2,D1.w) 

Byte in Puffer schreiben 

FC2EB0 31410008 

move.w 

D1,8(A0) 

neuen Tail-Index merken 

FC2EB4 4E75 

rts 




keymaus1 

FC2EB6 7605 

moveq.1 

#5,03 

rechte Taste annehmen 

FC2EB8 08010004 

btst 

#4,01 


FC2EBC 6702 

beq 

$FC2EC0 

ist rechte Taste (S47/SC7) 

FC2EBE 7606 

moveq.1 

#6,03 

linke Taste 

FC2EC0 08010007 

btst 

#7,01 

gedrückt oder losgelassen? 

FC2EC4 6706 

beq 

5FC2ECC 

gedrückt 

FC2EC6 07AD0E61 

bclr 

D3,$E61(A5) 

Bit für Taste löschen 

FC2ECA 6004 

bra 

JFC2ED0 


FC2ECC 07ED0E61 

bset 

D3,$E61(A5) 

Bit für Taste setzen 

FC2ED0 7200 

moveq.1 

#0,01 

x auf Null 

FC2ED2 7400 

moveq.1 

#0,D2 

y auf Null 


*************************************************************** keymaus 


FC2ED4 

41ED0E5E 

lea 

$E5E(A5),A0 

Zeiger auf Haus-Emulator-Puffer 

FC2ED8 

246D0E22 

move.1 

$E22(A5),A2 

Maus-Interrupt-Vektor 

FC2EDC 

4280 

clr.l 

DO 


FC2EDE 

102D0E61 

move.b 

$E61(A5),D0 

Status der Maus-Tasten holen 

FC2EE2 

EA08 

Isr.b 

#5,DO 

Bits für rechts/links nach Bit 0-1 

FC2EE4 

060000F8 

add.b 

#$F8,D0 

plus relative mouse Header 

FC2EE8 

11400000 

move.b 

00,(A0) 

in Puffer 

FC2EEC 

11410001 

move.b 

Dl,1(A0) 

x-Uert speichern 

FC2EF0 

11420002 

move.b 

D2,2(A0) 

y-Uert speichern 

FC2EF4 

4E92 

jsr 

(A2) 

Haus Interrupt-Routine aufrufen 

FC2EF6 

205F 

move.1 

(A7)+,A0 

iorec für Keyboard zurück 

FC2EF8 

4E75 

rts 


mauskeyl 





FC2EFA 

47C752D2 

dc.b 

$47,$C7,$52,$02 

Scan-Code für Haus-Ersatz 

*************************************************************** 

giacces, Soundchip lesen/schreiben 

FC2EFE 

302F0004 

move.w 

4(A7),D0 

Daten 

FC2F02 322F0006 

move.w 

6(A7),D1 

Registerncmmer plus Read/Write 

FC2F06 40E7 

move.w 

SR,-(A7) 

Status retten 

FC2F08 007C0700 

or.w 

#$700,SR 

IPL 7, Interrupts sperren 
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FC2F0C 48E76080 

FC2F10 41F9FFFF8800 

FC2F16 1401 

FC2F18 0201000F 

FC2F1C 1081 

FC2F1E E302 

FC2F20 6404 

FC2F22 11400002 

FC2F26 7000 

FC2F28 1010 

FC2F2A 4CDF0106 

FC2F2E 460F 

FC2F30 4E75 

movem.1 

lea 

move.b 

and.b 

move.b 

asl .b 

bcc 

move.b 

moveq.1 

move.b 

movem. 1 

move.w 

rts 

Dl-D2/A0,*(A7) 
SFFFF8800,A0 

D1.D2 

#$F,D1 

D1,(A0) 

#1,02 

SFC2F26 

DO,2(A0) 

#0,D0 

(A0),D0 

(A7)+,D1-D2/A0 
<A7)*,SR 

Register retten 

Adresse des Soundchip 

Registernummer holen 

Register 0-15 

Register selektieren 

Read/Urite-Bit testen 

lesen 

Datenbyte in Soundchip schreiben 

Byte vom Soundchip lesen 

Register zurückholen 

Status zurückholen 

FC2F32 74EF 

moveq.1 

#$EF,D2 

*** dtron, DTR einschalten 

Bit 4 

FC2F34 602C 

bra 

5FC2F62 

in Port A löschen 

FC2F36 7400 

moveq.t 

#0,02 

*** ongibit, Bit(s) in Soundchip Port A setzen 

FC2F38 342F0004 

move.w 

4<A7),D2 

Bitmuster holen 

FC2F3C 48E7E000 

movem.1 

D0-D2,•(A7) 

Register retten 

FC2F40 40E7 

move.w 

SR,(A7) 

Status retten 

FC2F42 007C0700 

or.w 

#$700,SR 

IPL 7, keine Interrupts 

FC2F46 720E 

moveq.1 

#14,Dl 

Port A lesen 

FC2F48 2F02 

move.1 

D2,•(A7) 

neues Bitmuster merken 

FC2F4A 61BA 

bsr 

SFC2F06 

Port A lesen 

FC2F4C 241F 

move.1 

(A7)+,D2 

Bitmuster zurückholen 

FC2F4E 8002 

or.b 

D2,D0 

Bits zu altem Wert Odern 

FC2F50 728E 

moveq.1 

#$8E,D1 

Port A schreiben 

FC2F52 61B2 

bsr 

SFC2F06 

neuen Wert schreiben 

FC2F54 460F 

move.w 

<A7)+,SR 

Status zuückholen 

FC2F56 4CDF0007 

movem.1 

<A7)+,D0D2 

Register zurückholen 

FC2F5A 4E75 

rts 



FC2F5C 7400 

moveq.1 

#0,D2 

'** offgibit, Bit(s) im Soundchip Port A 
löschen 

FC2F5E 342F0004 

move.w 

4(A7),D2 

Bitmuster holen 

FC2F62 48E7E000 

movem.1 

D0-D2,-(A7) 

Register retten 

FC2F66 40E7 

move.w 

SR,•(A7) 

Status retten 

FC2F68 007C0700 

or.w 

#$700,SR 

IPL 7, Interrupts sperren 

FC2F6C 720E 

moveq.1 

#14,Dl 

Port A lesen 

FC2F6E 2F02 

move.1 

D2,•(A7) 

Bitmuster merken 

FC2F70 6194 

bsr 

$FC2F06 

Port A lesen 

FC2F72 241F 

move.1 

(A7)+,D2 

Bitmuster zurückholen 

FC2F74 C002 

and.b 

02,00 

Bits löschen 

FC2F76 728E 

moveq.1 

#$8E,D1 

Port A schreiben 

FC2F78 618C 

bsr 

$FC2F06 

neuen Wert schreiben 

FC2F7A 460F 

move.w 

(A7)+,SR 

Status zurückholen 

FC2F7C 4CDF0007 

movem.1 

<A7)*,D0-D2 

Register zurückholen 

FC2F80 4E75 

rts 



FC2F82 4A6F0004 

tst.w 

4(A7) 

initmouse 

Haus abschalten? 

FC2F86 6726 

beq 

$FC2FAE 

ja, disable mouse 

FC2F88 2B6F000A0E22 

move.1 

10(A7),$E22(A5) 

Haus-Interrupt-Vektor 

FC2F8E 266F0006 

move.1 

6(A7),A3 

Adresse des Parameterblocks 

FC2F92 0C6F00010004 

cmp.w 

#1,4(A7) 

relative mouse? 

FC2F98 6724 

beq 

$FC2FBE 

ja 

FC2F9A 0C6F00020004 

cmp.w 

#2,4(A7) 

absolute mouse? 

FC2FA0 6736 

beq 

$FC2FD8 

ja 

FC2FA2 0C6F00040004 

cmp.w 

#4,4(A7) 

Keycode mouse? 

FC2FA8 6770 

beq 

$FC301A 

ja 
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FC2FAA 7000 

nx>veq. 1 

#0, DO 

Fehler, ungültig 

FC2FAC 4E75 

rts 



*************************************************************** 

disable mouse 

FC2FAE 7212 

moveq.1 

#$12,Dl 

disable mouse Befehl 

FC2FB0 6100F240 

bsr 

SFC21F2 

an IKBD senden 

FC2FB4 2B7C00FC30820E22 

move.1 

#$FC3082,$E22(A5) 

Maus-lnterrupt-Vektor auf rts 

FC2FBC 6070 

bra 

SFC302E 

ok 




relative mouse 

FC2FBE 45ED0E6E 

lea 

$E6E(A5),A2 

Transfer-Puffer-Zeiger 

FC2FC2 14FC0008 

move.b 

#8,(A2)+ 

relative mouse Befehl 

FC2FC6 14FC000B 

move.b 

#$B,(A2)+ 

relative mouse treshold x, y 

FC2FCA 6166 

bsr 

SFC3032 

Hausparameter setzen 

FC2FCC 7606 

moveq.1 

#6,D3 

Länge des Strings minus 1 

FC2FCE 45ED0E6E 

lea 

$E6E(A5),A2 

Transfer-Puffer-Zeiger 

FC2FD2 6100F248 

bsr 

SFC221C 

String an IKBD senden 

FC2FD6 6056 

bra 

SFC302E 

ok 

*************************************************************** 

absolute mouse 

FC2FD8 45ED0E6E 

lea 

$E6E(A5),A2 

Transfer-Puffer-Zeiger 

FC2FDC 14FC0009 

move.b 

#9,(A2)+ 

absolute mouse Befehl 

FC2FE0 14EB0004 

move.b 

4(A3),(A2)+ 

xmax msb 

FC2FE4 14EB0005 

move.b 

5(A3),(A2)+ 

xmax Isb 

FC2FE8 14EB0006 

move.b 

6(A3),(A2)+ 

ymax msb 

FC2FEC 14EB0007 

move.b 

7(A3),(A2)+ 

ymax Isb 

FC2FF0 14FC000C 

move.b 

#$C,(A2)+ 

absolute mouse scale 

FC2FF4 613C 

bsr 

SFC3032 

Hausparameter setzen 

FC2FF6 14FC000E 

move.b 

#$E,(A2)+ 

initial absolute mouse position 

FC2FFA 14FC0000 

move.b 

#0,(A2)+ 

FülIbyte 

FC2FFE 14EB0008 

move.b 

8(A3),(A2)+ 

Startposition x msb 

FC3002 14EB0009 

move.b 

9(A3),(A2)+ 

Startposition x Isb 

FC3006 14EB000A 

move.b 

10(A3),(A2)+ 

Startposition y msb 

FC300A 14EB000B 

move.b 

11(A3),(A2)+ 

Startposition y Isb 

FC300E 7610 

moveq.1 

#16,D3 

Stringlänge minus 1 

FC3010 45ED0E6E 

lea 

$E6E(A5),A2 

Transfer-Puffer-Zeiger 

FC3014 6100F206 

bsr 

SFC221C 

String an IKBD senden 

FC3018 6014 

bra 

SFC302E 

ok 




Keycode mouse 

FC301A 45ED0E6E 

lea 

$E6E(A5),A2 

Transfer-Puffer-Zeiger 

FC301E 14FC000A 

move.b 

#$A,(A2)+ 

mouse keycode Befehl 

FC3022 61 OE 

bsr 

SFC3032 

Hausparameter setzen 

FC3024 7605 

moveq.1 

#5,D3 

Länge des Strings minus 1 

FC3026 45ED0E6E 

lea 

$E6E(A5),A2 

Transfer-Puffer-Zeiger 

FC302A 6100F1F0 

bsr 

SFC221C 

String an IKBD senden 

FC302E 70FF 

moveq.1 

#-1,D0 

Flag für ok 

FC3030 4E75 

rts 


setmouse, Hausparameter setzen 




FC3032 14EB0002 

move.b 

2(A3),(A2)+ 

x treshold, scale, delta 

FC3036 14EB0003 

move.b 

3(A3),(A2)+ 

y treshold, scale, delta 

FC303A 7210 

moveq.1 

#16,Dl 

Top/Bottom? 

FC303C 922B0000 

sub.b 

(A3),Dl 


FC3040 14C1 

move.b 

D1,(A2)* 


FC3042 14FC0007 

move.b 

#7,(A2)+ 


FC3046 14EB0001 

move.b 

1(A3),(A2)+ 


FC304A 4E75 

rts 


xbtimer, Timer initialisieren 




FC304C 7000 

moveq.1 

#O,D0 


FC304E 7200 

moveq.1 

#0,D1 

Register löschen 

FC3050 7400 

moveq.1 

#0,D2 


FC3052 302F0004 

move.w 

4(A7),D0 

Timer-Nummer (0-3 -> A-D) 

FC3056 322F0006 

move.w 

6(A7),D1 

Wert für Control-Register 
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FC305A 342F0008 

move.w 

8(A7),D2 

Wert für Daten-Register 

FC305E 6100F550 

bsr 

SFC25B0 

Timerwerte setzen 

FC3062 4AAF000A 

tst. 1 

10(A7) 

zugehöriger Interrupt-Vektor 

FC3066 681A 

bmi 

SFC3082 

nicht setzen? 

FC3068 246F000A 

move.l 

10<A7),A2 

Vektor holen 

FC306C 7200 

moveq.1 

#0,D1 


FC306E 43F900FC3084 

lea 

SFC3084,A1 

Tabelle zur Best, der Interrupt-Nummer 

FC3074 0280000000FF 

and. 1 

#$FF,D0 


FC307A 10310000 

move.b 

<Al,D0.w),D0 

Interrupt-Nummer holen 

FC307E 6100F5E6 

bsr 

SFC2666 

initint, Interrupt installieren 

FC3082 4E75 

rts 


** Interrupt-Nummern der MFP-Timer 

FC3084 00080504 

dc.b 

13,8,5,4 

** keytrans, Keyboard-Tabellen setzen 

FC3088 4AAF0004 

tst.l 

4(A7) 

Standardtabelle ändern? 

FC308C 6B06 

bmi 

SFC3094 

nein 

FC308E 2B6F00040E62 

move.l 

4(A7),SE62(A5) 

Adresse der Standardtabelle 

FC3094 4AAF0008 

tst.l 

8(A7) 

Shift-Tabelle ändern? 

FC3098 6B06 

bmi 

SFC30A0 

nein 

FC309A 2B6F00080E66 

move.1 

8(A7),SE66(A5) 

Adresse der Shift-Tabelle 

FC30A0 4AAF000C 

tst.l 

12(A7) 

Caps Lock Tabelle ändern? 

FC30A4 6B06 

bmi 

SFC30AC 

nein 

FC30A6 2B6F000C0E6A 

move.1 

12(A7),$E6A(A5) 

Adresse der Caps Lock Tabelle 

FC30AC 203C00000E62 

move.l 

#SE62,D0 

Zeiger auf Adresse der Tabellen 

FC30B2 4E75 

rts 






'** bioskeys, Standard-Tastatur-Tabelle 

FC30B4 2B7C00FC22880E62 

move.l 

#$FC2288,$E62(A5) 

Standardtabeile 

FC30BC 2B7C00FC23080E66 

move.1 

#SFC2308,$E66(A5) 

Shift-Tabelle 

FC30C4 2B7C00FC23880E6A 

move.1 

#$FC2388,SE6A(A5) 

Caps-Tabelle 

FC30CC 4E75 

rts 






** dosound, Sound starten 

FC30CE 20200E8A 

move.l 

SE8A(A5),00 

Soundstatus holen 

FC30D2 222F0004 

move.l 

4<A7),D1 

Adresse der Soundtabelle 

FC30D6 6B08 

bmi 

SFC30E0 

nicht setzen 

FC30D8 2B410E8A 

move.l 

01,SE8A(A5) 

neue Soundtabelle 

FC300C 42200E8E 

clr.b 

SE8E(A5) 

Sound-Timer starten 

FC30E0 4E75 

rts 






** setprt, Printer-Konfiguration setzen/holen 

FC30E2 302D0E90 

move.w 

$E90(A5),D0 

alte Printer-Konfiguration 

FC30E6 4A6F0004 

tst.w 

4<A 7) 

neuer Wert negativ? 

FC30EA 6B06 

bmi 

SFC30F2 

dann nicht setzen 

FC30EC 3B6F00040E90 

move.w 

4(A7),SE90(A5) 

neuen Wert übernehmen 

FC30F2 4E75 

rts 






** kbrate, Tastatur-Repeat setzen/holen 

FC30F4 302D0E82 

move.w 

SE82(A5) ,D0 

Verzögerung vor Tasten-Repeat 

FC30F8 4A6F0004 

tst.w 

4(A7) 

neuer Wert negativ? 

FC30FC 6B16 

bmi 

SFC3114 

ja, nicht setzen 

FC30FE 322F0004 

move.w 

4(A7),D1 

neuen Wert holen 

FC3102 1B410E82 

move.b 

01,SE82(A5) 

und merken 

FC3106 4A6F0006 

tst.w 

6(A7) 

Wiederhol rate 

FC310A 6B08 

bmi 

SFC3114 

negativ, dann nicht setzen 

FC310C 322F0006 

move.w 

6(A7),D1 

neuen Wert holen 

FC3110 1B410E83 

move.b 

01,SE83(A5) 

und merken 

FC3114 4E75 

rts 






** ikbdvecs, Zeiger auf IKB0 ♦ MIDI Vektoren 

FC3116 203COOOOOE12 

move.l 

#SE12,00 

Adresse der Vektortabelle 

FC311C 4E75 

rts 
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timercint, Timer C Interrupt, 200 Hz 


FC311E 52B9000004BA 

addq.1 

#1,$4BA 

_hz_200 erhöhen 

FC3124 E7F900000E8Ö 

rol .w 

SE88 

Bitmap rotieren 

FC312A 6A4E 

bpi 

SFC317A 

nicht vierter Interrupt, dann fertig 

FC312C 48E7FFFE 

movem.1 

D0-D7/A0-A6,-(A7) 

Register retten 

FC3130 4BF900000000 

lea 

$0,A5 

A5 löschen 

FC3136 614C 

bsr 

SFC3184 

Sound verarbeiten 

FC3138 082D00010484 

btst 

#1,$484(A5) 

conterm, Tasten-Repeat enabled? 

FC313E 672A 

beq 

$FC316A 

nein 

FC3140 4A2D0E7F 

tst.b 

$E7F(A5) 

Taste gedrückt? 

FC3144 6724 

beq 

SFC316A 

nein 

FC3146 4A2D0E80 

tst.b 

$E80(A5) 

Zähler für Startverzögerung 

FC314A 6706 

beq 

SFC3152 

nicht aktiv 

FC314C 532D0E80 

subq.b 

#1,$E80(A5) 

Zähler dekrementieren 

FC3150 6618 

bne 

SFC316A 

noch nicht abgelaufen? 

FC3152 532D0E81 

subq.b 

#1,$E81(A5) 

Zähler für Wiederholrate dekrementieren 

FC3156 6612 

bne 

SFC316A 

noch nicht abgelaufen? 

FC3158 1B6D0E830E81 

move.b 

$E83(A5),$E81(A5) 

Zähler neu laden 

FC315E 102D0E7F 

move.b 

$E7F(A5),D0 

zu wiederholende Taste 

FC3162 41ED0C76 

lea 

$C76(A5),A0 

iorec für Keyboard 

FC3166 6100FADA 

bsr 

SFC2C42 

Tastencode in Keyboardpuffer 

FC316A 3F2D0442 

move.w 

$442<A5),-(A7) 

_t imerjns 

FC316E 20600400 

move.1 

$400(A5),A0 

etv_timer 

FC3172 4E90 

jsr 

(A0) 

Routine ausführen 

FC3174 544F 

addq.w 

#2,A7 

Stackpointer korrigieren 

FC3176 4CDF7FFF 

movem. 1 

(A7)+,D0-D7/A0-A6 

Register zurückholen 

FC317A 08B90005FFFFFA11 

bclr 

#5,$FFFFFA11 

Interrupt-Service-Bit löschen 

FC3182 4E73 

rte 



*************************************************************** 

sndirq, Sound Interrupt Routine 

FC3184 48E7C080 

movem. 1 

D0-D1/A0,-(A7) 

Register retten 

FC3188 202D0E8A 

move.1 

$E8A(A5),D0 

Zeiger auf Soundtabelle 

FC318C 67000088 

beq 

SFC3216 

kein Sound aktiv? 

FC3190 2040 

move.1 

D0,A0 

Zeiger nach A0 

FC3192 102D0E8E 

move.b 

SE8E(A5),D0 

Timerwert laden 

FC3196 6708 

beq 

SFC31A0 

neuer Sound gestartet? 

FC3198 5300 

subq.b 

#1 ,D0 

sonst Timer dekrementieren 

FC319A 1B400E8E 

move.b 

D0,$E8E(A5) 

und wieder abspeichern 

FC319E 6076 

bra 

SFC3216 

fertig 

FC31A0 1018 

move.b 

(A0)+,00 

Sound-Befehl holen 

FC31A2 6B2E 

bmi 

SFC31D2 

Bit 7 gesetzt, spezieller Befehl 

FC31A4 13C0FFFF8800 

move.b 

D0,$FFFF8800 

Register im Soundchip selektieren 

FC31AA 0C000007 

cmp.b 

#7,DO 

Mixer? 

FC31AE 661A 

bne 

$FC31CA 

nein 

FC31B0 1218 

move.b 

(A0)+,D1 

Daten für Mixer 

FC31B2 0201003F 

and.b 

#$3F,D1 

Bit 0-5 isolieren 

FC31B6 1039FFFF8800 

move.b 

$FFFF8800,D0 

Mixer lesen 

FC31BC 02000000 

and.b 

#$C0,00 

Bit 6-7 isolieren 

FC31C0 8001 

or.b 

Dl,00 

Sounddaten dazu Odern 

FC31C2 13C0FFFF8802 

move.b 

D0,$FFFF8802 

und in Register schreiben 

FC31C8 6006 

bra 

SFC31A0 

nächster Soundbefehl 

FC31CA 13D8FFFF8802 

move.b 

(A0)+,$FFFF8802 

Byte direkt in Soundchip schreiben 

FC31D0 60CE 

bra 

SFC31A0 

nächster Soundbefehl 

FC31D2 5200 

addq.b 

#1,00 

war Befehl $FF? 

FC31D4 6A32 

bpi 

SFC3208 

ja 

FC31D6 0C000081 

cmp.b 

#$81,00 

war Befehl $80? 

FC31DA 6606 

bne 

SFC31E2 

nein 

FC31DC 1B580E8F 

move.b 

(A0)+,$E8F(A5) 

Byte für später merken 

FC31E0 60BE 

bra 

SFC31A0 

nächster Soundbefehl 

FC31E2 0C000082 

cmp.b 

#$82,00 

war Befehl $81? 
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FC31E6 6620 

bne 

SFC3208 

nein 

FC31E8 13D8FFFF8800 

move.b 

<A0)+,SFFFF8800 

Register selektieren 

FC31EE 1018 

move.b 

(A0)+,D0 

Increment-Uert 

FC31F0 D12D0E8F 

add.b 

00,$E8F(A5) 

addieren 

FC31F4 1018 

move.b 

(A0)+,D0 

Endwert 

FC31F6 13ED0E8FFFFF8802 

move.b 

$E8F(A5),$FFFF8802 

Temp-Wert in Soundchip schreiben 

FC31FE B02D0E8F 

cmp.b 

SE8F(A5),D0 

Endwert erreicht? 

FC3202 670E 

beq 

SFC3212 

ja 

FC3204 5948 

subq.w 

#4, A0 

Soundpointer zurück auf gleichen Befehl 

FC3206 600A 

bra 

SFC3212 


FC3208 1B580E8E 

move.b 

(A0)+,$E8E(A5) 

nächsten Wert als Verzögerungstimer 

FC320C 6604 

bne 

$FC3212 


FC320E 307C0000 

move.w 

#O,A0 

Soundzeiger löschen 

FC3212 2B480E8A 

move.1 

A0,$E8A(A5) 

aktuellen Soundzeiger merken 

FC3216 4CDF0103 

movem.1 

<A7)+,D0-D1/A0 

Register zurückholen 

FC321A 4E75 

rts 






** Soundtabelle für Bell 

FC321C 0034 

dc.b 

0,$34 


FC321E 0100 

dc.b 

1,0 


FC3220 0200 

dc.b 

2,0 


FC3222 0300 

dc.b 

3,0 


FC3224 0400 

dc.b 

4,0 


FC3226 0500 

dc.b 

5,0 


FC3228 0600 

dc.b 

6,0 


FC322A 07FE 

dc.b 

7,$FE 


FC322C 0810 

dc.b 

8,16 


FC322E 0900 

dc.b 

9,0 


FC3230 0A00 

dc.b 

10,0 


FC3232 0B00 

dc.b 

11,0 


FC3234 0C10 

dc.b 

12,16 


FC3236 0D09 

dc.b 

13.9 


FC3238 FFOO 

dc.b 

SFF.O 





Soundtabelle für Tasten-Klick 

FC323A 0038 

dc.b 

0.S3B 


FC323C 0100 

dc.b 

1,0 


FC323E 0200 

dc.b 

2,0 


FC3240 0300 

dc.b 

3,0 


FC3242 0400 

dc.b 

4,0 


FC3244 0500 

dc.b 

5,0 


FC3246 0600 

dc.b 

6,0 


FC3248 07FE 

dc.b 

7,$FE 


FC324A 0810 

dc.b 

8,16 


FC324C 0003 

dc.b 

13,3 


FC324E 0B80 

dc.b 

11,$80 


FC3250 0C01 

dc.b 

12,1 


FC3252 FFOO 

dc.b 

SFF.O 

** prtblk, Hardcopy 

FC3254 4E560000 

link 

A6,#0 


FC3258 48E7070C 

movem. 1 

D5-D7/A4-A5,•(A7) 

Register retten 

FC325C 2A6E0008 

move.1 

8(A6),A5 

Adresse des Parameterblocks 

FC3260 287C00002A50 

move.1 

#$2A50,A4 

Adresse des Arbeitsspeichers 

FC3266 7E1E 

moveq.1 

#30,D7 

30 Bytes 

FC3268 6004 

bra 

SFC326E 

zum Schleifenende 

FC326A 1800 

move.b 

(A5)+,(A4)+ 

Parameter kopieren 

FC326C 5347 

subq.w 

#1 ,D7 

Zähler vermindern 

FC326E 4A47 

tst.w 

D7 

schon abgelaufen? 

FC3270 6EF8 

bgt 

SFC326A 

nein, nächstes Byte 

FC3272 0C79000100002A68 

cmp.w 

#1,$2A68 

p_port 

FC327A 630E 

bis 

SFC328A 

0 oder 1? 
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FC327C 33FCFFFF000004EE 

move.w 

#•1,$4EE 

dumpfig löschen 

FC3284 70FF 

moveq.1 

#*1,00 

Flag für Fehler 

FC3286 60000F6C 

bra 

SFC41F4 

abbrechen 

FC328A 4A7900002A68 

tst.w 

S2A68 

p_port 

FC3290 6704 

beq 

SFC3296 

Centronics? 

FC3292 4240 

clr.w 

00 

0 = RS 232 

FC3294 6002 

bra 

SFC3298 


FC3296 7001 

moveq.1 

#1 ,D0 

1 = Centronics 

FC3298 13C000002A4E 

move.b 

D0.S2A4E 

Druckerport merken 

FC329E 4A7900002A58 

tst.w 

S2A58 

pheight 

FC32A4 6654 

bne 

SFC32FA 

nicht null? 

FC32A6 6032 

bra 

SFC32DA 

sonst nur p width Bytes dumpen 

FC32A8 0C790001000004EE 

cmp.w 

#1,S4EE 

dumpfig auf eins? 

FC32B0 663A 

bne 

SFC32EC 

Hardcopy abbrechen 

FC32B2 207900002A50 

move.1 

S2A50.A0 

pblkptr, Bildschirmadresse 

FC32B8 1010 

move.b 

(A0),D0 

Byte holen 

FC32BA 4880 

ext.w 

DO 


FC32BC 3E80 

move.w 

DO,(A7) 

auf den Stack 

FC32BE 61000F3E 

bsr 

SFC41FE 

Zeichen ausgeben 

FC32C2 52B900002A50 

addq.1 

#1,S2A50 

p blkptr erhöhen 

FC32C8 4A40 

tst.w 

DO 

Ausgabe ok? 

FC32CA 670E 

beq 

SFC32DA 

ja 

FC32CC 33FCFFFF000004EE 

move.w 

#•1,S4EE 

dumpfig löschen 

FC32D4 70FF 

moveq.1 

#•1,D0 

Flag für Fehler 

FC32D6 60000F1C 

bra 

SFC41F4 

abbrechen 

FC32DA 4240 

clr.w 

DO 


FC32DC 303900002A56 

move.w 

S2A56.D0 

p_width 

FC32E2 537900002A56 

subq.w 

#1,S2A56 

p_width vermindern 

FC32E8 4A40 

tst.w 

DO 

noch nicht auf null? 

FC32EA 66BC 

bne 

SFC32A8 

nächstes Zeichen ausgeben 

FC32EC 33FCFFFF000004EE 

move.w 

#*1,$4EE 

_dunpflg löschen 

FC32F4 4240 

clr.w 

DO 

ok 

FC32F6 60000EFC 

bra 

SFC41F4 

abbrechen 

FC32FA 0C79000300002A66 

cmp.w 

#3,S2A66 

p_type 

FC3302 630E 

bis 

SFC3312 

ok? 

FC3304 33FCFFFF000004EE 

move.w 

#•1,S4EE 

_dumpflg löschen 

FC330C 70FF 

moveq.1 

#•1,D0 

Flag für Fehler 

FC330E 60000EE4 

bra 

SFC41F4 

abbrechen 

FC3312 OC79000100002A60 

cmp.w 

*1,$2A60 

p destres, Druckerauflösung 

FC331A 630E 

bis 

SFC332A 

ok? 

FC331C 33FCFFFF000004EE 

move.w 

#•1,S4EE 

_dumpflg löschen 

FC3324 70FF 

moveq.1 

UM,DO 

Flag für Fehler 

FC3326 60000ECC 

bra 

SFC41F4 

abbrechen 

FC332A 0C79000200002A5E 

cmp.w 

#2,$2A5E 

psrcres, Bildschirmauflösung 

FC3332 630E 

bis 

SFC3342 

ok? 

FC3334 33FCFFFF000004EE 

move.w 

#•1,S4EE 

dumpfig löschen 

FC333C 70FF 

moveq.1 

#• 1,D0 

Flag für Fehler 

FC333E 60000EB4 

bra 

SFC41F4 

abbrechen 

FC3342 0C79000700002A54 

cmp.w 

#7,S2A54 

poffset 

FC334A 630E 

bis 

SFC335A 

ok? 

FC334C 33FCFFFF000004EE 

move.w 

#•1,$4EE 

dumpfig löschen 

FC3354 70FF 

moveq.1 

#•1,D0 

Flag für Fehler 

FC3356 60000E9C 

bra 

SFC41F4 

abbrechen 

FC335A 4A7900002A5E 

tst.w 

$2A5E 

psrcres, Bildschirmauflösung 

FC3360 6704 

beq 

JFC3366 

low resolution? 

FC3362 4240 

clr.w 

DO 


FC3364 6002 

bra 

SFC3368 


FC3366 7001 

moveq.1 

#1 ,D0 

Flag für Low Resolution 

FC3368 13C00000883C 

move.b 

D0.S883C 

merken 
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FC336E 0C79000100002A5E 

cmp.w 

#1,$2A5E 

medium resolution? 

FC3376 6704 

beq 

SFC337C 

ja 

FC3378 4240 

clr.w 

DO 


FC337A 6002 

bra 

SFC337E 


FC337C 7001 

moveq.1 

#1,00 

Flag für Hidiun Resolution 

FC337E 13C000008786 

move.b 

DO,$8786 

merken 

FC3384 0C79000200002A5E 

cmp.w 

#2,$2A5E 

High Resolution? 

FC338C 6704 

beq 

SFC3392 

ja 

FC338E 4240 

clr.w 

00 


FC3390 6002 

bra 

SFC3394 


FC3392 7001 

moveq.1 

#1,00 

Flag für High Resolution 

FC3394 13C000008788 

move.b 

DO,$8788 

merken 

FC339A 4A7900002A60 

tst.w 

$2A60 

p_destres, Druckerauflösung 

FC33A0 6704 

beq 

$FC33A6 

Testmodus? 

FC33A2 4240 

clr.w 

00 

Qualitätsmodus 

FC33A4 6002 

bra 

$FC33A8 


FC33A6 7001 

moveq.1 

#1,00 


FC33A8 13C0000087A0 

move.b 

D0,$87A0 

Flag für Druckmodus 

FC33AE 0C79000100002A66 

cmp.w 

#1,$2A66 

p_type, ATARI Farb-Matrix-Drucker? 

FC33B6 6704 

beq 

$FC33BC 

ja 

FC33B8 4240 

clr.w 

00 


FC33BA 6002 

bra 

$FC33BE 


FC33BC 7001 

moveq.1 

#1,00 

Flag für ATARI Farb-Matrix-Drucker 

FC33BE 13C000007F00 

move.b 

D0,$7F00 

merken 

FC33C4 0C79000200002A66 

cmp.w 

#2,$2A66 

ptype, ATARI Typenrad-Drucker? 

FC33CC 6704 

beq 

$FC33D2 

ja 

FC33CE 4240 

clr.w 

00 


FC33D0 6002 

bra 

$FC33D4 


FC33D2 7001 

moveq.1 

#1,00 

Flag für ATARI Typenrad-Drucker 

FC3304 13C00000883E 

move.b 

D0,$883E 

merken 

FC33DA 0C79000300002A66 

cmp.w 

#3,$2A66 

P.type. Epson S/U-Matrix-Drucker? 

FC33E2 6704 

beq 

$FC33E8 

ja 

FC33E4 4240 

clr.w 

00 

sonst ATARI S/W-Matrix-Drucker 

FC33E6 6002 

bra 

$FC33EA 


FC33E8 7001 

moveq.1 

#1,00 

Flag für Epson S/U-Matrix-Drucker 

FC33EA 13C000007F22 

move.b 

D0,$7F22 

merken 

FC33F0 4A390000883E 

tst.b 

$883E 

ATARI Typenrad-Drucker? 

FC33F6 670E 

beq 

$FC3406 

nein 

FC33F8 33FCFFFF000004EE 

move.w 

#-1,$4EE 

_dumpflg löschen 

FC3400 70FF 

moveq.1 

#-1,00 

Flag für Fehler 

FC3402 600000F0 

bra 

$FC41F4 

abbrechen 

FC3406 4A3900007F22 

tst.b 

$7F22 

EPSON S/U-Matrix-Drucker? 

FC340C 670C 

beq 

$FC341A 

nein 

FC340E 4A39000087A0 

tst.b 

$87A0 

Qualitäts-Modus? 

FC3414 6604 

bne 

$FC341A 

nein 

FC3416 7001 

moveq.1 

#1 ,D0 


FC3418 6008 

bra 

$FC3422 


FC341A 1039000087A0 

move.b 

$87A0,D0 

Qualitäts-Modus 

FC3420 4880 

ext.w 

00 


FC3422 13C0000087A0 

move.b 

D0,$87A0 

Qualitäts-Modus 

FC3428 4A390000883C 

tst.b 

$883C 

low resolution? 

FC342E 6726 

beq 

$FC3456 

nein 

FC3430 0C79014000002A56 

cmp.w 

#320,$2A56 

p width > 320? 

FC3438 631C 

bis 

$FC3456 

nein 

FC343A 4240 

clr.w 

00 


FC343C 303900002A56 

move.w 

$2A56,D0 

p_width 

FC3442 D07CFEC0 

add.w 

#•320,00 

- 320 

FC3446 D17900002A5C 

add.w 

D0,$2A5C 

p_right 

FC344C 33FC014000002A56 

move.w 

#320,$2A56 

p_width 



Das BIOS^Listin^ 


443 


FC3454 6024 

bra 

1FC347A 


FC3456 0C79028000002A56 

cmp.w 

#640,$2A56 

pwidth > 640? 

FC345E 631A 

bis 

$FC347A 

nein 

FC3460 4240 

clr.w 

00 


FC3462 303900002A56 

move.w 

S2A56.D0 

pwidth 

FC3468 D07CFD80 

add.u 

#•640,00 

-640 

FC346C D17900002A5C 

add.w 

D0,S2A5C 

plus rright 

FC3472 33FC028000002A56 

move.w 

#640,$2A56 

pwidth 

FC347A 4AB900002A6A 

tst. 1 

S2A6A 

p_masks, Halbton-Maske 

FC3480 6614 

bne 

$FC3496 

angegeben? 

FC3482 23FC00FD2FD800002A6A 

move.1 

#$FD2FD8,$2A6A 

Default-Maske benutzen 

FC348C 13FC00010000755C 

move.b 

#1,$755C 


FC3494 6006 

bra 

SFC349C 


FC3496 42390000755C 

clr.b 

$755C 


FC349C 4A3900008788 

tst.b 

$8788 

High Resolution? 

FC34A2 6718 

beq 

$FC34BC 

nein 

FC34A4 207900002A62 

move.1 

$2A62,A0 

pcolpal, Farbpalette 

FC34AA 4240 

clr.w 

DO 


FC34AC 3010 

move.w 

(A0),D0 

Farbe holen 

FC34AE C07C0001 

and.w 

#1,00 


FC34B2 33C00000882E 

move.w 

D0.S882E 

normal/invertiert 

FC34B8 60000290 

bra 

$FC374A 


FC34BC 4247 

clr.w 

D7 

Zähler für laufende Farbe löschen 

FC34BE 60000282 

bra 

SFC3742 

ans Schleifenende 

FC34C2 207900002A62 

move.1 

$2A62,A0 

p_colpal, Adresse Farbpalette 

FC34C8 4240 

clr.w 

DO 


FC34CA 3010 

move.w 

<A0),D0 

Farbe holen 

FC34CC C07C0777 

and.w 

#$777,DO 

RGB-Bits isolieren 

FC34D0 33C000007EEC 

move.w 

D0,$7EEC 

Farbe merken 

FC34D6 54B900002A62 

addq.1 

#2,$2A62 

Zeiger auf nächste Farbe 

FC34DC 0C79077700007EEC 

cmp.w 

#$777,$7EEC 

Farbe gleich weiß? 

FC34E4 67000230 

beq 

$FC3716 

ja 

FC34E8 303900007EEC 

move.w 

$7EEC,D0 

Farbe laden 

FC34EE C07C0007 

and.w 

#7,DO 

Bl au*Level isolieren 

FC34F2 33C0000068F2 

move.w 

D0,$68F2 

und merken 

FC34F8 303900007EEC 

move.w 

$7EEC,D0 

Farbe laden 

FC34FE E840 

asr.w 

#4, DO 


FC3500 C07C0007 

and.w 

#7,DO 

Grün-Level isolieren 

FC3504 33C00000878A 

move.w 

D0,$878A 

und merken 

FC350A 303900007EEC 

move.w 

$7EEC,D0 

Farbe laden 

FC3510 E040 

asr.w 

#8,DO 


FC3512 C07C0007 

and.w 

#7,DO 

Rot-Level isolieren 

FC3516 33C000007DC6 

move.w 

D0,$7DC6 

und merken 

FC351C 4A3900007F00 

tst.b 

$7F00 

ATARI Farb-Matrix-Drucker? 

FC3522 670001A0 

beq 

$FC36C4 

nein 

FC3526 3047 

move.w 

D7,A0 


FC3528 D1C8 

add.l 

A0,A0 


FC352A D1FC00007F02 

add.l 

#$7F02,A0 


FC3530 30B900007DC6 

move.w 

$7DC6,(A0) 

Rot-Level 

FC3536 3047 

move.w 

D7,A0 


FC3538 D1C8 

add.l 

A0,A0 


FC353A 227C00007F02 

move.1 

#$7F02,A1 


FC3540 30309800 

move.w 

(A0,A1.1>,DO 


FC3544 B0790000878A 

cmp.w 

$878A,D0 

Grün-Level 

FC354A 6C08 

bge 

$FC3554 


FC354C 30390000878A 

move.w 

$878A,D0 

Grün-Level 

FC3552 600E 

bra 

$FC3562 


FC3554 3047 

move.w 

D7,A0 


FC3556 D1C8 

add.l 

A0,A0 
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FC3558 227C00007F02 

move.1 

#$7F02,A1 

FC355E 30309800 

move.w 

(A0,AI.1),D0 

FC3562 3247 

move.w 

D7,A1 

FC3564 D3C9 

add.l 

Al, AI 

FC3566 D3FC00007F02 

add.l 

#$7F02,A1 

FC356C 3280 

move.w 

DO,(AI) 

FC356E 3047 

move.w 

D7.A0 

FC3570 D1C8 

add. 1 

A0, A0 

FC3572 227C00007F02 

move.1 

#S7F02,A1 

FC3578 30309800 

move.w 

(A0,AI.1),D0 

FC357C B079000068F2 

cmp.w 

S68F2,D0 

FC3582 6C08 

bge 

SFC358C 

FC3584 3039000068F2 

move.w 

S68F2.D0 

FC358A 600E 

bra 

SFC359A 

FC358C 3047 

move.w 

D7.A0 

FC358E D1C8 

add.l 

A0,A0 

FC3590 227C00007F02 

move.1 

«7F02.A1 

FC3596 30309800 

move.w 

(A0.A1.D.D0 

FC359A 3247 

move.w 

D7.A1 

FC359C D3C9 

add. 1 

AI,AI 

FC359E D3FC00007F02 

add.l 

«7F02.A1 

FC35A4 3280 

move.w 

DO,(AI) 

FC35A6 3047 

move.w 

D7,A0 

FC35A8 D1C8 

add.l 

A0,A0 

FC35AA D1FC00007F02 

add. 1 

#S7F02,A0 

FC35B0 5250 

addq.w 

#1,(A0) 

FC35B2 3047 

move.w 

07, A0 

FC35B4 D1C8 

add.l 

A0,A0 

FC35B6 D1FC000087A4 

add. 1 

«87A4.A0 

FC35BC 30B900007DC6 

move.w 

$7DC6,(A0) 

FC35C2 3047 

move.w 

D7,A0 

FC35C4 D1C8 

add.l 

A0,A0 

FC35C6 227C000087A4 

move.1 

#$87A4,A1 

FC35CC 30309800 

move.w 

(A0,A1.1),DO 

FC3500 B0790000878A 

cmp.w 

S878A,D0 

FC35D6 6F08 

ble 

SFC35E0 

FC35D8 30390000878A 

move.w 

5878A,D0 

FC35DE 600E 

bra 

SFC35EE 

FC35E0 3047 

move.w 

D7,A0 

FC35E2 D1C8 

add. 1 

A0,A0 

FC35E4 227C000087A4 

move.1 

«87A4,A1 

FC35EA 30309800 

move.w 

(A0,A1.1),DO 

FC35EE 3247 

move.w 

07,AI 

FC35F0 D3C9 

add.l 

AI,AI 

FC35F2 D3FC000087A4 

add.l 

#S87A4,A1 

FC35F8 3280 

move.w 

DO,(AI) 

FC35FA 3047 

move.w 

D7,A0 

FC35FC D1C8 

add.l 

A0.A0 

FC35FE 227C000087A4 

move.l 

#$87A4,A1 

FC3604 30309800 

move.w 

(A0,A1.1),D0 

FC3608 B079000068F2 

cmp.w 

S68F2,D0 

FC360E 6F08 

ble 

SFC3618 

FC3610 3039000068F2 

move.w 

S68F2.D0 

FC3616 600E 

bra 

SFC3626 

FC3618 3047 

move.w 

D7,A0 

FC361A D1C8 

add.l 

A0,A0 

FC361C 227C000087A4 

move.l 

#S87A4,A1 

FC3622 30309800 

move.w 

(A0,AI.1),D0 

FC3626 3247 

move.w 

D7,A1 


Blau-Level 
Blau-Level 


Rot-Level 


Grün-Level 

Grün-Level 


Blau-Level 

Blau-Level 
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FC3628 

D3C9 

add.l 

AI,AI 


FC362A 

D3FC000087A4 

add.l 

#$87A4,A1 


FC3630 

3280 

move.w 

DO,(AI) 


FC3632 

303900007DC6 

move.w 

$7DC6,D0 

Rot-Level 

FC3638 

3247 

move.w 

07,AI 


FC363A 

D3C9 

add.l 

AI,AI 


FC363C 

D3FC000087A4 

add.l 

#$87A4,A1 


FC3642 

3211 

move.w 

(AI),Dl 


FC3644 

5241 

addq.w 

#1,01 


FC3646 

9041 

sub.w 

01,DO 


FC3648 

6E04 

bgt 

SFC364E 


FC364A 

4240 

clr.w 

DO 


FC364C 

6002 

bra 

SFC3650 


FC364E 

7001 

moveq.1 

#1,00 


FC3650 

33C000007DC6 

move.w 

D0,$7DC6 

Rot-Level 

FC3656 

30390000878A 

move.w 

*878A,D0 

Grün-Level 

FC365C 

3247 

move.w 

D7,A1 


FC365E 

D3C9 

add.l 

AI,AI 


FC3660 

D3FC000087A4 

add. 1 

#$87A4,A1 


FC3666 

3211 

move.w 

(AI),Dl 


FC3668 

5241 

addq.w 

#1 ,D1 


FC366A 

9041 

sub.w 

01,00 


FC366C 

6E04 

bgt 

SFC3672 


FC366E 

4240 

clr.w 

00 


FC3670 

6002 

bra 

SFC3674 


FC3672 

7001 

moveq.1 

#1,00 


FC3674 

33C00000878A 

move.w 

D0,$878A 

Grün-Level 

FC367A 

3039000068F2 

move.w 

S68F2,D0 

Blau-Level 

FC3680 

3247 

move.w 

D7,A1 


FC3682 

D3C9 

add.l 

AI,AI 


FC3684 

D3FC000087A4 

add. 1 

#S87A4,A1 


FC368A 

3211 

move.w 

(AI).Dl 


FC368C 

5241 

addq.w 

#1,01 


FC368E 

9041 

sub.w 

Dl,00 


FC3690 

6E04 

bgt 

SFC3696 


FC3692 

4240 

clr.w 

DO 


FC3694 

6002 

bra 

SFC3698 


FC3696 

7001 

moveq.1 

#1,00 


FC3698 

33C0000068F2 

move.w 

D0.S68F2 

Blau-Level 

FC369E 

303900007DC6 

move.w 

S7DC6.D0 

Rot-Level 

FC36A4 

E540 

asl .w 

#2, DO 


FC36A6 

32390000878A 

move.w 

S878A.D1 

Grün-Level 

FC36AC 

E341 

asl .w 

#1,01 


FC36AE 

0041 

add.w 

Dl,DO 


FC36B0 

D079000068F2 

add.w 

S68F2.D0 

Blau-Level 

FC36B6 

3247 

move.w 

D7,A1 


FC36B8 

03C9 

add.l 

AI,AI 


FC36BA 

D3FC00007DCA 

add.l 

#*7DCA,A1 


FC36C0 

3280 

move.w 

00,(AI) 


FC36C2 

6050 

bra 

$FC3714 


FC36C4 

303900007DC6 

move.w 

$7DC6,D0 

Rot-Level 

FC36CA 

C1FC001E 

muls.w 

#30,DO 

mal 30 X 

FC36CE 

32390000878A 

move.w 

S878A.01 

Grün-Level 

FC3604 

C3FC003B 

muls.w 

#59,01 

mal 59 X 

FC3608 

0041 

add.w 

01,00 


FC360A 

3239000068F2 

move.w 

S68F2.01 

Blau-Level 

FC36E0 

C3FC000B 

muls.w 

#11,Dl 

mal 11 X 

FC36E4 

D041 

add.w 

Dl,00 


FC36E6 

48C0 

ext. 1 

DO 
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FC36E8 81FC0064 

divs.w 

#100,DO 

durch 100 % 

FC36EC 3247 

move.w 

D7,A1 


FC36EE D3C9 

add.l 

AI,AI 


FC36F0 D3FC000087A4 

add.l 

#*87A4,A1 


FC36F6 3280 

move.w 

DO,(AI) 


FC36F8 3047 

move.w 

D7,A0 


FC36FA D1C8 

add.l 

A0,A0 


FC36FC D1FC00007DCA 

add.l 

#*7DCA,A0 


FC3702 30BC0007 

move.w 

#7,<A0> 


FC3706 3047 

move.w 

D7,A0 


FC3708 D1C8 

add.l 

A0,A0 


FC370A DlFC00007F02 

add. 1 

#*7F02,A0 


FC3710 30BC0008 

move.w 

#8,(A0) 


FC3714 602A 

bra 

$FC3740 


FC3716 3047 

move.w 

D7,A0 


FC3718 D1C8 

add.l 

A0,A0 


FC371A D1FC000087A4 

add.l 

#*87A4,A0 


FC3720 30BC0008 

move.w 

#8,(A0) 


FC3724 3047 

move.w 

D7,A0 


FC3726 D1C8 

add.l 

A0,A0 


FC3728 D1FC00007DCA 

add.l 

#*7DCA,A0 


FC372E 30BC0007 

move.w 

#7,(A0) 


FC3732 3047 

move.w 

D7,A0 


FC3734 D1C8 

add.l 

A0,A0 


FC3736 D1FC00007F02 

add.l 

#*7F02,A0 


FC373C 30BC0008 

move.w 

#8,(A0) 


FC3740 5247 

addq.w 

#1,D7 

nächste Farbe 

FC3742 BE7C0010 

cmp.w 

#*10,D7 

schon 16 Farben? 

FC3746 6D00FD7A 

blt 

SFC34C2 

nein, nächste Farbe 

FC374A 4A390000883C 

tst.b 

*883C 

low resolution? 

FC3750 6716 

beq 

*FC3768 

nein 

FC3752 7004 

moveq.1 

#4,DO 

4 Punkte pro Bildschirmpunkt 

FC3754 33C0000087C4 

move.w 

D0,*87C4 


FC375A 33C00000879A 

move.w 

D0,*879A 


FC3760 33C000007E9A 

move.w 

D0,*7E9A 


FC3766 6038 

bra 

SFC37A0 


FC3768 4A3900008786 

tst.b 

*8786 

medium resolution? 

FC376E 6718 

beq 

JFC3788 

nein 

FC3770 7002 

moveq.1 

#2, DO 

2 Punkte pro Bildschirmpunkt 

FC3772 33C0000087C4 

move.w 

D0,*87C4 


FC3778 33C000007E9A 

move.w 

D0,*7E9A 


FC377E 33FC00040000879A 

move.w 

#4,*879A 


FC3786 6018 

bra 

*FC37A0 


FC3788 33FC000100007E9A 

move.w 

#1,*7E9A 


FC3790 33FC00080000879A 

move.w 

#8,*879A 


FC3798 33FC0002000087C4 

move.w 

#2,*87C4 


FC37A0 4A3900007F22 

tst.b 

*7F22 

Epson S/U-Matrix-Drucker? 

FC37A6 6706 

beq 

*FC37AE 

nein 

FC37A8 3F3C0002 

move.w 

#2,-(A7) 


FC37AC 6004 

bra 

*FC37B2 


FC37AE 3F3C0001 

move.w 

#1,•(A7) 


FC37B2 3039000087C4 

move.w 

*87C4,D0 


FC37B8 48C0 

ext.l 

DO 


FC37BA 81DF 

divs.w 

(A7)+,D0 


FC37BC 33C0000087C4 

move.w 

D0,*87C4 


FC37C2 4240 

clr.w 

DO 


FC37C4 303900002A5A 

move.w 

*2A5A,D0 

pleft 

FC37CA D07900002A56 

add.w 

*2A56,D0 

plus p_width 

FC37D0 D07900002A5C 

add.w 

*2A5C,D0 

plus p_right 
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FC37D6 C0F900007E9A 

mulu.w 

$7E9A,D0 

FC37DC E848 

Isr.w 

#4,00 

FC37DE 33C000007DC8 

move.w 

D0,$7DC8 

FC37E4 303900007DC8 

move.w 

$7DC8,D0 

FC37EA C1F90000879A 

muls.w 

S879A.D0 

FC37F0 33C0000075B2 

move.w 

D0,$75B2 

FC37F6 203900002A50 

move.1 

S2A50.D0 

FC37FC COBCFFFFFFFE 

and. 1 

#$FFFFFFFE,D0 

FC3802 23C000007DEA 

move.1 

D0,$7DEA 

FC3808 203900002A50 

move.1 

S2A50.00 

FC380E B0B900007DEA 

cmp. 1 

$7DEA,D0 

FC3814 660A 

bne 

SFC3820 

FC3816 4240 

clr.w 

DO 

FC3818 303900002A54 

move.w 

$2A54,D0 

FC381E 600A 

bra 

SFC382A 

FC3820 4240 

clr.w 

00 

FC3822 303900002A54 

move.w 

S2A54.D0 

FC3828 5040 

addq.w 

#8, DO 

FC382A 33C000007EEE 

move.w 

D0,$7EEE 

FC3830 13FC000100008842 

move.b 

#1,$8842 

FC3838 427900001708 

clr.w 

$1708 

FC383E 60000976 

bra 

SFC41B6 

FC3842 0C790001000004EE 

cmp.w 

#1 ,$4EE 

FC384A 6600097C 

bne 

SFC41C8 

FC384E 4A390000755C 

tst.b 

S755C 

FC3854 6700018E 

beq 

SFC39E4 

FC3858 13FC000100006958 

move.b 

#1 ,$6958 

FC3860 4240 

clr.w 

DO 

FC3862 303900002A56 

move.w 

$2A56,D0 

FC3868 C0F900007E9A 

mulu.w 

$7E9A,D0 

FC386E E848 

Isr.w 

#4,DO 

FC3870 907900007E9A 

sub.w 

$7E9A,D0 

FC3876 E348 

Isl .w 

#1 ,D0 

FC3878 4840 

swap 

DO 

FC387A 4240 

clr.w 

00 

FC387C 4840 

swap 

00 

FC387E D0B900007DEA 

add.l 

$7DEA,D0 

FC3884 23C00000878C 

move.1 

D0,$878C 

FC388A 700F 

moveq.1 

# 15,DO 

FC388C 4241 

clr.w 

D 1 

FC388E 323900002A56 

move.w 

$ 2A56.D1 

FC3894 C27C000F 

and.w 

#$F,D1 

FC3898 9041 

sub.w 

01,DO 

FC389A 33C0000087CA 

move.w 

D0,$87CA 

FC38A0 33F900002A560000755E 

move.w 

$2A56,$755E 

FC38AA 6000012C 

bra 

$FC39D8 

FC38AE 4240 

clr.w 

DO 

FC38B0 303900002A58 

move.w 

$2A58,D0 

FC38B6 907900001708 

sub.w 

$1708,00 

FC38BC 4840 

swap 

00 

FC38BE 4240 

clr.w 

DO 

FC38C0 4840 

swap 

DO 

FC38C2 80F90000879A 

divu.w 

$879A,D0 

FC38C8 6708 

beq 

$FC38D2 

FC38CA 30390000879A 

move.w 

$879A,D0 

FC38D0 600E 

bra 

$FC38E0 

FC3802 4240 

clr.w 

DO 

FC3804 303900002A58 

move.w 

$2A58,D0 

FC380A 907900001708 

sub.w 

$1708,DO 


durch 16 

p_blkptr, BiIdschirmadresse 
gerade Adresse 

pblkptr 


dunpflag auf eins? 

pwidth 


pwidth 

p_width 

p_height 


p_height 
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FC38E0 33C000008782 

move.w 

00,$8782 

FC38E6 23F90000878C0000808E 

move.1 

$878C,$808E 

FC38F0 4247 

clr.w 

D7 

FC38F2 600000A6 

bra 

SFC399A 

FC38F6 4279000087D2 

clr.w 

S87D2 

FC38FC 33FC0001000087C6 

move.w 

#1,$87C6 

FC3904 23F90000808E00007EF0 

move.1 

$808E,$7EF0 

FC390E 4246 

clr.w 

D6 

FC3910 6030 

bra 

SFC3942 

FC3912 207900007EF0 

move.1 

$7EF0,A0 

FC3918 3010 

move.w 

(A0),D0 

FC391A 720F 

moveq.1 

#15,01 

FC391C 9279000087CA 

sub.w 

$87CA,D1 

FC3922 E260 

asr.w 

01,00 

FC3924 C07C0001 

and.w 

#1 ,D0 

FC3928 C1F9000087C6 

muls.w 

$87C6,D0 

FC392E D179000087D2 

add.w 

D0.S87D2 

FC3934 54B900007EF0 

addq.1 

#2,$7EF0 

FC393A E1F9000087C6 

asl .w 

S87C6 

FC3940 5246 

addq.w 

#1,06 

FC3942 BC7900007E9A 

cmp.w 

$7E9A,D6 

FC3948 60C8 

blt 

SFC3912 

FC394A 4A3900008788 

tst.b 

$8788 

FC3950 671A 

beq 

SFC396C 

FC3952 3039000087D2 

move.w 

$8702,00 

FC3958 32390000882E 

move.w 

$882E,D1 

FC395E B340 

eor.w 

Dl,00 

FC3960 6608 

bne 

SFC396A 

FC3962 423900006958 

clr.b 

S6958 

FC3968 603A 

bra 

SFC39A4 

FC396A 60IC 

bra 

SFC3988 

FC396C 3079000087D2 

move.w 

S87D2.A0 

FC3972 D1C8 

add.l 

A0,A0 

FC3974 D1FC000087A4 

add. 1 

#$87A4,A0 

FC397A 0C500008 

cmp.w 

#8,(A0) 

FC397E 6708 

beq 

SFC3988 

FC3980 423900006958 

clr.b 

$6958 

FC3986 60IC 

bra 

SFC39A4 

FC3988 303900007DC8 

move.w 

$7DC8,D0 

FC398E E340 

asl .w 

#1 ,D0 

FC3990 48C0 

ext.l 

00 

FC3992 D1B90000808E 

add. 1 

D0,$808E 

FC3998 5247 

addq.w 

#1 ,D7 

FC399A BE7900008782 

cmp.w 

$8782,D7 

FC39A0 6D00FF54 

blt 

$FC38F6 

FC39A4 4A3900006958 

tst.b 

$6958 

FC39AA 6736 

beq 

$FC39E2 

FC39AC 5379000087CA 

subq.w 

#1,$87CA 

FC39B2 4A79000087CA 

tst.w 

$87CA 

FC39B8 6C18 

bge 

$FC3902 

FC39BA 303900007E9A 

move.w 

$7E9A,D0 

FC39C0 E340 

asl .w 

#1,00 

FC39C2 48C0 

ext.l 

00 

FC39C4 91B90000878C 

sub. 1 

D0,$878C 

FC39CA 33FCOO0F000087CA 

move.w 

#$F,$87CA 

FC3902 53790000755E 

subq.w 

#1,$755E 

FC3908 4A790000755E 

tst.w 

$755E 

FC390E 6E00FECE 

bgt 

$FC38AE 

FC39E2 600A 

bra 

$FC39EE 
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FC39E4 33F900002A560000755E 

move.w 

$2A56,$755E 


FC39EE 3E390000755E 

move.w 

$755E,D7 


FC39F4 CFF9000087C4 

muls.w 

$87C4,D7 


FC39FA 4A3900007F22 

tst.b 

S7F22 


FC3A00 670A 

beq 

SFC3A0C 


FC3A02 3007 

move.w 

D7 # D0 


FC3A04 48C0 

ext.l 

DO 


FC3A06 81FC0002 

divs.w 

#2, DO 


FC3A0A 6002 

bra 

SFC3A0E 


FC3A0C 4240 

clr.w 

DO 


FC3A0E DE40 

add.w 

D0.D7 


FC3A10 3007 

move.w 

D7,D0 

Anzahl Bytes 

FC3A12 48C0 

ext.l 

DO 


FC3A14 81FC0100 

divs.w 

#$100,DO 

durch 256 

FC3A18 4840 

swap 

DO 

Rest 

FC3A1A 13C0000075B8 

move.b 

D0,$75B8 

als Lo-Byte 

FC3A20 3007 

move.w 

D7,D0 

Anzahl Bytes 

FC3A22 48C0 

ext.l 

DO 


FC3A24 81FC0100 

divs.w 

#$100,DO 

durch 256 

FC3A28 13C0000075BA 

move.b 

D0.S75BA 

als Hi-Byte 

FC3A2E 427900007F24 

clr.w 

S7F24 


FC3A34 60000656 

bra 

SFC408C 


FC3A38 427900008844 

clr.w 

$8844 


FC3A3E 600005F0 

bra 

SFC4030 


FC3A42 4A3900007F00 

tst.b 

S7F00 


FC3A48 67000076 

beq 

SFC3AC0 


FC3A4C 4A3900008788 

tst.b 

$8788 


FC3A52 6600006C 

bne 

$FC3AC0 


FC3A56 4A7900008844 

tst.w 

$8844 


FC3A5C 661E 

bne 

$FC3A7C 


FC3A5E 2EBC00FD2FEA 

move.1 

#$FD2FEA,(A7) 

ESC, 'X', 6 

FC3A64 610007E4 

bsr 

$FC424A 

String ausgeben 

FC3A68 4A40 

tst.w 

DO 

ok? 

FC3A6A 670E 

beq 

$FC3A7A 

ja 

FC3A6C 33FCFFFF000004EE 

move.w 

#-1,$4EE 

_dumpflg löschen 

FC3A74 70FF 

moveq.1 

#-1,00 

Flag für Fehler 

FC3A76 6000077C 

bra 

$FC41F4 

abbrechen 

FC3A7A 6044 

bra 

$FC3AC0 


FC3A7C 0079000100008844 

cmp.w 

#1,$8844 


FC3A84 661E 

bne 

$FC3AA4 


FC3A86 2EBC00FD2FEF 

move.1 

#$FD2FEF,(A7) 

ESC, 'X', 5 

FC3A8C 610007BC 

bsr 

$FC424A 

String ausgeben 

FC3A90 4A40 

tst.w 

DO 

ok? 

FC3A92 670E 

beq 

$FC3AA2 

ja 

FC3A94 33FCFFFF000004EE 

move.w 

#-1,$4EE 

dumpfig löschen 

FC3A9C 70FF 

moveq.1 

#-1,D0 

Flag für Fehler 

FC3A9E 60000754 

bra 

$FC41F4 

abbrechen 

FC3AA2 601C 

bra 

$FC3AC0 


FC3AA4 2EBC00FD2FF4 

move.1 

#$FD2FF4,(A7) 

ESC, 'X', 3 

FC3AAA 6100079E 

bsr 

$FC424A 

String ausgeben 

FC3AAE 4A40 

tst.w 

DO 

Flag für Fehler 

FC3AB0 670E 

beq 

$FC3AC0 

ok 

FC3AB2 33FCFFFF000004EE 

move.w 

#*1,$4EE 

dumpfig löschen 

FC3ABA 70FF 

moveq.1 

# • 1,DO 

Flag für Fehler 

FC3ABC 60000736 

bra 

$FC41F4 

abbrechen 

FC3AC0 4A3900007F22 

tst.b 

$7F22 


FC3AC6 6708 

beq 

$FC3AD0 


FC3AC8 2EBC00FD2FF9 

move.1 

#$FD2FF9,(A7) 

ESC, 'L' 

FC3ACE 6006 

bra 

$FC3AD6 
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FC3AD0 2EBC00FD2FFD 

move.1 

#$FD2FFD,(A7) 

ESC, »Y* 

FC3AD6 61000772 

bsr 

SFC424A 

String ausgeben 

FC3ADA 4A40 

tst.w 

DO 

ok? 

FC3ADC 670E 

beq 

SFC3AEC 

ja 

FC3ADE 33FCFFFF000004EE 

move.w 

#-1,$4EE 

dumpfig löschen 

FC3AE6 70FF 

moveq.1 

#-1,D0 

Flag für Fehler 

FC3AE8 6000070A 

bra 

SFC41F4 

abbrechen 

FC3AEC 1039000075B8 

move.b 

$75B8,D0 

Zähler Lo*Byte 

FC3AF2 4880 

ext.w 

DO 


FC3AF4 3E80 

move.w 

D0,(A7) 


FC3AF6 61000706 

bsr 

SFC41FE 

Zeichen an Drucker ausgeben 

FC3AFA 4A40 

tst.w 

DO 

ok? 

FC3AFC 670E 

beq 

SFC3B0C 

ja 

FC3AFE 33FCFFFF000004EE 

move.w 

#-1,$4EE 

_dumpflg löschen 

FC3B06 70FF 

moveq.1 

#-1,00 

Flag für Fehler 

FC3B08 600006EA 

bra 

SFC41F4 

abbrechen 

FC3B0C 1039000075BA 

move.b 

$75BA,D0 

Zähler Hi-Byte 

FC3B12 4880 

ext.w 

DO 


FC3B14 3E80 

move.w 

D0,(A7) 


FC3B16 610006E6 

bsr 

SFC41FE 

Zeichen an Drucker ausgeben 

FC3B1A 4A40 

tst.w 

DO 

ok? 

FC3B1C 670E 

beq 

SFC3B2C 

ja 

FC3B1E 33FCFFFF000004EE 

move.w 

#•1,$4EE 

_dumpflg löschen 

FC3B26 70FF 

moveq.1 

#-1,D0 

Flag für Fehler 

FC3B28 600006CA 

bra 

SFC41F4 

abbrechen 

FC3B2C 13FC0001000087A2 

move.b 

#1,$87A2 


FC3B34 23F900007DEA0000878C 

move.1 

$7DEA,$878C 


FC3B3E 33F900007EEE000087CA 

move.w 

$7EEE,$87CA 


FC3B48 427900001706 

clr.w 

$1706 


FC3B4E 600004B0 

bra 

$FC4000 


FC3B52 4247 

clr.w 

D7 


FC3B54 600C 

bra 

$FC3B62 


FC3B56 3047 

move.w 

D7,A0 


FC3B58 D1FC00007F26 

add.l 

«7F26.A0 


FC3B5E 4210 

clr.b 

(A0) 


FC3B60 5247 

addq.w 

#1 ,D7 


FC3B62 BE7C0008 

cmp.w 

#8,D7 


FC3B66 6DEE 

blt 

SFC3B56 


FC3B68 4247 

clr.w 

D7 


FC3B6A 60IE 

bra 

SFC3B8A 


FC3B6C 3047 

move.w 

D7,A0 


FC3B6E D1C8 

add.l 

A0,A0 


FC3B70 D1FC000075BC 

add.l 

#$75BC,A0 


FC3B76 30BC0007 

move.w 

«7, (AO) 


FC3B7A 3047 

move.w 

D7.A0 


FC3B7C D1C8 

add.l 

A0, A0 


FC3B7E DlFC00008790 

add.l 

#$8790,A0 


FC3B84 30BC0008 

move.w 

#8,(A0) 


FC3B88 5247 

addq.w 

#1 ,D7 


FC3B8A BE7C0004 

cmp.w 

#4,D7 


FC3B8E 60DC 

blt 

SFC3B6C 


FC3B90 4240 

clr.w 

DO 


FC3B92 303900002A58 

move.w 

$2A58,D0 

p_height 

FC3B98 907900001708 

sub.w 

$1708,00 


FC3B9E 4840 

swap 

DO 


FC3BA0 4240 

clr.w 

DO 


FC3BA2 4840 

swap 

DO 


FC3BA4 80F90000879A 

divu.w 

$879A,D0 


FC3BAA 6708 

beq 

$FC3BB4 
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ESC Kleinbuchstabe 


FC4438 0241 

add.w 

01,Dl 

Wortindex bilden 

FC443A 323B1020 

move.w 

SFC445C(PC,D1.w),0l 

Offset holen 

FC443E 4EFB101C 

jmp 

$FC445C(PC,D1.w) 

Sprung auf Routine 




'* Tabelle für ESC Großbuchstabe 

FC4442 0080 

dc.w 

$FC44C2*$FC4442 

ESC A 

FC4444 0090 

dc.w 

SFC4402-SFC4442 

ESC B 

FC4446 00A4 

dc.w 

SFC44E6-SFC4442 

ESC C 

FC4448 00B8 

dc.w 

SFC44FA-SFC4442 

ESC D 

FC444A 007C 

dc.w 

SFC44BE-SFC4442 

ESC E 

FC444C FF8E 

dc.w 

SFC4300-SFC4442 

ESC F, rts 

FC444E FF8E 

dc.w 

SFC4300-SFC4442 

ESC G, rts 

FC4450 00C8 

dc.w 

SFC450A-SFC4442 

ESC H 

FC4452 0178 

dc.w 

SFC45BA-SFC4442 

ESC I 

FC4454 0000 

dc.w 

$FC4512-$FC4442 

ESC J 

FC4456 00E2 

dc.w 

SFC4524-SFC4442 

ESC K 

FC4458 018A 

dc.w 

$FC45CC-$FC4442 

ESC L 

FC445A 01A0 

dc.w 

$FC45E2-$FC4442 

ESC M 




'* Tabelle für ESC Kleinbuchstabe 

FC445C FF9C 

dc.w 

SFC43F8-SFC445C 

ESC b 

FC445E FFBO 

dc.w 

SFC440C-SFC445C 

ESC c 

FC4460 0192 

dc.w 

SFC45EE-SFC445C 

ESC d 

FC4462 01BC 

dc.w 

JFC4618-SFC445C 

ESC e 

FC4464 0106 

dc.w 

SFC4632-SFC445C 

ESC f 

FC4466 FF74 

dc.w 

$FC43D0-SFC445C 

ESC g, rts 

FC4468 FF74 

dc.w 

SFC43D0-SFC445C 

ESC h, rts 

FC446A FF74 

dc.w 

SFC43D0-SFC445C 

ESC i, rts 

FC446C 01EE 

dc.w 

SFC464A-SFC445C 

ESC j 

FC446E 01 FA 

dc.w 

SFC4656-SFC445C 

ESC k 

FC4470 020E 

dc.w 

SFC466A-SFC445C 

ESC l 

FC4472 FF74 

dc.w 

SFC43D0-SFC445C 

ESC m, rts 

FC4474 FF74 

dc.w 

SFC4300-SFC445C 

ESC n, rts 

FC4476 0220 

dc.w 

SFC467C-SFC445C 

ESC o 

FC4478 01OE 

dc.w 

SFC456A-SFC445C 

ESC p 

FC447A 0114 

dc.w 

SFC4570-SFC445C 

ESC q 

FC447C FF74 

dc.w 

SFC43D0-SFC445C 

ESC r, rts 

FC447E FF74 

dc.w 

SFC43D0-SFC445C 

ESC s, rts 

FC4480 FF74 

dc.w 

SFC43D0-SFC445C 

ESC t, rts 

FC4482 FF74 

dc.w 

SFC43D0-SFC445C 

ESC u, rts 

FC4484 0236 

dc.w 

SFC4692-SFC445C 

ESC v 

FC4486 023C 

dc.w 

$FC4698-$FC445C 

ESC w 




'* VDI ESC 1, Bildschirmgröße holen 

FC4488 206C000A 

move.1 

10(A4),A0 

Adresse CONTRl-Array 

FC448A 317C00020008 

move.w 

#2,8(A0) 

2 Ergebniswerte 

FC4492 206C0016 

move.l 

22(A4),A0 

Adresse INTOUT-Array 

FC4496 302CFFDA 

move.w 

-38(A4),D0 

maximale Cursorspalte 

FC449A 5240 

addq.w 

#1,00 

plus Offset 

FC449C 31400002 

move.w 

D0,2(A0) 

nach INTOUT[1] 

FC44A0 302CFFDC 

move.w 

-36(A4),D0 

maximale Cursorzeile 

FC44A4 5240 

addq.w 

#1 ,D0 

plus Offset 

FC44A6 3080 

move.w 

00,(AO) 

nach INTOUTTO) 

FC44A8 4E75 

rts 






•* VDI ESC 17, Hardcopy 

FC44AA 3F3C0014 

move.w 

#S14,-(A7) 

Hardcopy 

FC44AE 4E4E 

trap 

#14 

XBIOS 

FC44B0 548F 

addq.1 

#2,A7 

Stackpointer korrigieren 

FC44B2 4E75 

rts 
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BEL 


FC4398 6000DED6 

bra 

SFC2270 

Ton ausgeben 

*************************************************************** 

TAB 

FC439C 302CFFEA 

move.w 

-22(A4),D0 

aktuelle Cursorspalte 

FC43A0 0240FFF8 

and.w 

#$FFF8,D0 

in durch 8 teilbare Zahl wandeln 

FC43A4 5040 

addq.u 

#8,00 

plus 8 

FC43A6 322CFFEC 

move.w 

-20(A4),D1 

aktuelle Cursorzeile 

FC43AA 600006AA 

bra 

SFC4A56 

Cursor neu setzen 

Zeichen nach ESC verarbeiten 




FC43AE 41FAFFB2 

lea 

$FC4362(PC),A0 

Adresse Standard conout 

FC43B2 6116 

bsr 

SFC43CA 

constate setzen 

FC43B4 927C0041 

sub.w 

#$41,01 

minus 1 A• 

FC43B8 6B16 

bmi 

SFC43D0 

kleiner, ignorieren 

FC43BA B27C000C 

cmp.w 

#$C,D1 

•H* 

FC43BE 6F6E 

ble 

SFC442E 

zur ESC-Tabelle für Großbuchstaben 

FC43C0 B27C0018 

cmp.w 

#$18,01 

1 Y 1 für Cursor setzen 

FC43C4 665A 

bne 

$FC4420 

nein, auf Kleinbuchstabe testen 

FC43C6 41FA000A 

lea 

$FC43D2(PC),A0 

con_state für ESC Y 

FC43CA 23C8000004A8 

move.1 

A0,$4A8 

constate setzen 

FC43D0 4E75 

rts 


Zeile nach ESC Y verarbeiten 

FC43D2 927C0020 

sub.w 

#$20,01 

Offset abziehen 

FC43D6 33C1000004AC 

move.w 

Dl,$4AC 

saverow, Zeile merken 

FC430C 41FA0004 

lea 

$FC43E2(PC),A0 

con_state für Spalte verarbeiten 

FC43E0 60E8 

bra 

$FC43CA 

con_state setzen 

Spalte nach ESC Y verarbeiten 




FC43E2 927C0020 

sub.w 

#$20,Dl 

Offset abziehen 

FC43E6 3001 

move.w 

01,00 

Spalte nach 00 

FC43E8 3239000004AC 

move.w 

$4AC,D1 

Zeile holen 

FC43EE 61000666 

bsr 

$FC4A56 

Cursor setzen 

FC43F2 41FAFF6E 

lea 

$FC4362(PC),A0 

con_state auf Standard 

FC43F6 6002 

bra 

$FC43CA 

constate setzen 

ESC b, Schriftfarbe setzen 




FC43F8 41FA0004 

lea 

$FC43FE(PC),A0 

con_state setzen 

FC43FC 60CC 

bra 

$FC43CA 

Schriftfarbe setzen 




FC43FE 927C0020 

sub.w 

#$20,01 

Offset abziehen 

FC4402 3941FFE2 

move.w 

Dl,*30(A4) 

Vordergrundfarbe (Schrift) 

FC4406 41FAFF5A 

lea 

$FC4362(PC),A0 

con_state auf Standard 

FC440A 60BE 

bra 

$FC43CA 

constate setzen 

ESC c, Hintergrundfarbe setzen 




FC440C 41FA0004 

lea 

$FC4412(PC),A0 

con_state setzen 

FC4410 60B8 

bra 

$FC43CA 

Hintergrundfarbe setzen 




FC4412 927C0020 

sub.w 

#$20,01 

Offset abziehen 

FC4416 3941FFE0 

move.w 

01,-32(A4) 

Hintergrundfarbe 

FC441A 41FAFF46 

lea 

$FC4362(PC),A0 

con_state auf Standard 

FC441E 60AA 

bra 

$FC43CA 

con_state setzen 

auf ESC Kleinbuchstabe testen 




FC4420 927C0021 

sub.w 

#$21,01 

Offset abziehen 

FC4424 6BA4 

bmi 

$FC43CA 

kleiner 'b* ignorieren 

FC4426 B27C0015 

cmp.w 

#$15,01 

•w* 

FC442A 6F0C 

ble 

$FC4438 

kleiner gleich, Sequenz verarbeiten 

FC442C 4E75 

rts 






ESC Großbuchstabe 

FC442E 0241 

add.w 

01,01 

Uortindex bilden 

FC4430 323B1010 

move.w 

$FC4442(PC,D1.w),Dl 

Offset holen 

FC4434 4EFB100C 

jmp 

$FC4442(PC,01.w) 

Sprung auf Routine 
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FC4300 0208 

dc.w 

SFC44FA-SFC42F2 

7, Alpha Cursor right 

FC4302 0218 

dc.w 

SFC450A-SFC42F2 

8, Home alpha Cursor 

FC4304 0220 

dc.w 

SFC4512-SFC42F2 

9, Erase to end of alpha screen 

FC4306 0232 

dc.w 

SFC4524-JFC42F2 

10, Erase to end of alpha text line 

FC4308 0244 

dc.w 

SFC4536-SFC42F2 

11, Direct alpha Cursor address 

FC430A 0256 

dc.w 

$FC4548-$FC42F2 

12, Output Cursor addressable alpha text 

FC430C 0278 

dc.w 

SFC456A-SFC42F2 

13, Reverse Video on 

FC430E 027E 

dc.w 

SFC4570-SFC42F2 

14, Reverse video off 

FC4310 0284 

dc.w 

$FC4576-$FC42F2 

15, Inquire current alpha Cursor address 

FC4312 02A4 

dc.w 

SFC4596-SFC42F2 

16, Inquire tablet Status 

FC4314 01B8 

dc.w 

SFC44AA-SFC42F2 

17, Hardcopy 

FC4316 02B6 

dc.w 

$FC45A8-$FC42F2 

18, Place graphic Cursor at location 

FC4318 02C2 

dc.w 

$FC45B4-$FC42F2 

19, Remove last graphic Cursor 

FC431A B07C0065 

cmp.w 

#$65,DO 

VDI ESC 101? 

FC431E 670A 

beq 

SFC432A 

ja 

FC4320 B07C0066 

cmp.w 

#$66,DO 

VDI ESC 102? 

FC4324 67000776 

beq 

$FC4A9C 

ja 

FC4328 4E75 

rts 






* VDI ESC 101, Zeilenoffset vom 

FC432A 6100030C 

bsr 

$FC4638 

ESC f, Cursor aus Bildschirmstart 

FC432E 206C000E 

move.1 

14(A4),A0 

Adresse INTIN-Array ' 

FC4332 3010 

move.w 

(A0),D0 

INT IN [0], Offset in Rasterzeilen 

FC4334 C0EC0008 

mulu.w 

8(A4),D0 

mal Bytes pro Bildschirmzeile 

FC4338 3940FFE8 

move.w 

DO,-24(A4) 

gleich Offset in Bytes 

FC433C 600002CA 

bra 

$FC4608 

Cursor wieder einschalten 




* ascout auf Bildschirm 

FC4340 322F0006 

move.w 

6(A7),D1 

Zeichen vom Stack holen 

FC4344 C27C00FF 

and.w 

#$FF,D1 

Bit 0-7 

FC4348 60000400 

bra 

$FC474A 

Zeichen ausgeben 




* bconout auf Bildschirm 

FC434C 322F0006 

move.w 

6(A7),D1 

Zeichen vom Stack holen 

FC4350 49F900002994 

lea 

$2994,A4 

Adresse der LINE-A-Variablen 

FC4356 C27C00FF 

and.w 

#$FF,D1 

Bit 0-7 

FC435A 2079000004A8 

move.1 

$4A8,A0 

constate-Vektor 

FC4360 4ED0 

jmp 

<A0) 

Routine ausführen 




’* Standard conout 

FC4362 B27C0020 

cmp.w 

#$20,Dl 

Controlcode? 

FC4366 6C0003E2 

bge 

$FC474A 

nein, Zeichen ausgeben 

FC436A B23C001B 

cmp.b 

#$1B,D1 

ESC? 

FC436E 6606 

bne 

$FC4376 

nein, andere Controlcodes 

FC4370 41FA003C 

lea 

$FC43AE(PC),A0 

Adresse der ESC-Verarbeitung 

FC4374 6054 

bra 

$FC43CA 

constate setzen 

FC4376 5F41 

subq.w 

#7.01 

kleiner 7? 

FC4378 6B56 

bmi 

$FC43D0 

ignorieren 

FC437A B27C0006 

cmp.w 

#6,Dl 

größer 13? 

FC437E 6E50 

bgt 

SFC43D0 

ignorieren 

FC4380 D241 

add.w 

Dl,Dl 

als Uortindex 

FC4382 323B1006 

move.w 

$FC438A(PC,D1.W),D1 

relative Adresse aus Tabelle holen 

FC4386 4EFB1002 

jmp 

$FC438A(PC,Dl.w) 

Sprung auf Routine 




** Sprungtabelle für CTRL-Codes 

FC438A 000E 

dc.w 

$FC4398-$FC438A 

7, BEL 

FC438C 0170 

dc.w 

$FC44FA-$FC438A 

8, BS 

FC438E 0012 

dc.w 

$FC439C-$FC438A 

9, TAB 

FC4390 03IE 

dc.w 

$FC46A8-$FC438A 

10, LF 

FC4392 03IE 

dc.w 

SFC46A8-SFC438A 

11, VT 

FC4394 031E 

dc.w 

$FC46A8-$FC438A 

12, FF 

FC4396 0314 

dc.w 

$FC469E-$FC438A 

13, CR 
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FC4268 206E0008 

move. 1 

8(A6),A0 

Stringadresse 

FC426C 0C1000FF 

cmp.b 

#$FF,(A0) 

Endekriterium erreicht? 

FC4270 660E 

bne 

SFC4250 

nein 

FC4272 4240 

clr.w 

00 

ok 

FC4274 4E5E 

unlk 

A6 


FC4276 4E75 

rts 


* Hardcopy, Druckerstatus holen 

FC4278 48E71F1E 

movem.1 

D3-D7/A3-A6,-<A7) 

Register retten 

FC427C 98CO 

sub. 1 

A5,A5 

A5 löschen 

FC427E 20600506 

move.1 

$506(A5),A0 

prt_stat laden 

FC4282 4E90 

jsr 

(AO) 

Routine ausführen 

FC4284 4CDF78F8 

movem.1 

(A7)+,0307/A3A6 

Register zurückholen 

FC4288 4E75 

rts 






* Hardcopy, Drucker-Ausgabe 

FC428A 302F0006 

move.w 

6(A7),D0 

auszugebendes Zeichen 

FC428E 48E71F1E 

movem.1 

D3-D7/A3-A6,-(A7) 

Register retten 

FC4292 3F00 

move.w 

00,(A7) 

Zeichen auf Stack 

FC4294 3F00 

move.w 

00, (A7) 

nochmal 

FC4296 98CD 

sub. 1 

A5,A5 

A5 löschen 

FC4298 206D050A 

move.1 

$50A(A5),A0 

prt_vec laden 

FC429C 4E90 

jsr 

(AO) 

Routine ausführen 

FC429E 584F 

addq.w 

#4,A7 

Stackpointer korrigieren 

FC42A0 4CDF78F8 

movem.1 

(A7)+,D3-D7/A3-A6 

Register zurückholen 

FC42A4 4E75 

rts 






* Hardcopy, RS 232 Ausgabe-Status 

FC42A6 48E71F1E 

movem. 1 

D3-D7/A3-A6,-(A7) 

Register retten 

FC42AA 98CD 

sub. 1 

A5,A5 

A5 löschen 

FC42AC 206D050E 

move.1 

$50E(A5),A0 

aux_stat laden 

FC42B0 4E90 

jsr 

(AO) 

Routine ausführen 

FC42B2 4CDF78F8 

movem.1 

(A7)+,D3-07/A3-A6 

Register zurückholen 

FC42B6 4E75 

rts 






* Hardcopy, RS 232 Ausgabe 

FC42B8 302F0006 

move.w 

6(A7),D0 

auszugebendes Zeichen 

FC42BC 48E71F1E 

movem. 1 

D3-D7/A3-A6,•(A7) 

Register retten 

FC42C0 3F00 

move.w 

00,-(A7) 

Zeichen auf Stack 

FC42C2 3F00 

move.w 

00,-(A7) 

nochmal 

FC42C4 9BCD 

sub. 1 

A5,A5 

A5 löschen 

FC42C6 20600512 

move.l 

$512(A5),A0 

aux_vec laden 

FC42CA 4E90 

jsr 

(AO) 

Routine ausführen 

FC42CC 584F 

addq.w 

#4,A7 

Stackpointer korrigieren 

FC42CE 4CDF78F8 

movem.1 

(A7)*,D3-D7/A3-A6 

Register zurückholen 

FC42D2 4E75 

rts 


* VDI ESCAPE-Funktionen 

FC42D4 49F900002994 

lea 

$2994,A4 

Adresse der Line-A-Variablen 

FC42DA 2O6C000A 

move.1 

10(A4),A0 

Adresse CONTRL-Array 

FC42DE 3028000A 

move.w 

10(A0),D0 

Funkt ionsnummer 

FC42E2 B07C0013 

cmp.w 

«13,00 

größer 19? 

FC42E6 6232 

bhi 

SFC431A 

ja, Test auf weitere VDI-Funktionen 

FC42E8 0040 

add.w 

00,00 

als Uortindex 

FC42EA 303B0006 

move.w 

$FC42F2(PC,D0.w),00 

relative Adresse aus Tabelle holen 

FC42EE 4EFB0002 

jmp 

$FC42F2(PC,D0.w) 

Sprung auf VDI-Funktion 
* Adressen der VDI-Funktionen 

FC42F2 01B6 

dc.w 

$FC44A8-$FC42F2 

0, rts 

FC42F4 0196 

dc.w 

$FC4488-$FC42F2 

1, Inquire addressable alpha character 

FC42F6 01C8 

dc.w 

SFC446A-SFC42F2 

2, Exit alpha mode cells 

FC42F8 01C2 

dc.w 

SFC4464-SFC42F2 

3, Enter alpha mode 

FC42FA 0100 

dc.w 

$FC44C2-$FC42F2 

4, Alpha Cursor up 

FC42FC 01E0 

dc.w 

SFC44D2-SFC42F2 

5, Alpha Cursor down 

FC42FE 01F4 

dc.w 

$FC44E6-$FC42F2 

6, Alpha cursur left 
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FC41B6 4240 

clr.w 

00 


FC41B8 303900002A58 

move.w 

$2A58,D0 

p_height 

FC41BE B07900001708 

cmp.w 

$1708,DO 


FC41C4 6200F67C 

bhi 

SFC3842 


FC41C8 2EBC00FD3014 

move.1 

#$FD3014,(A7) 

ESC, '2' 

FC41CE 6100007A 

bsr 

SFC424A 

String ausgeben 

FC41D2 4A3900007F00 

tst.b 

S7F00 


FC41D8 6710 

beq 

SFC41EA 


FC41DA 4A3900008788 

tst.b 

$8788 


FC41E0 6608 

bne 

$FC41EA 


FC41E2 2EBC00FD3018 

move.1 

#$FD3018,(A7) 

ESC, 'X' 

FC41E8 6160 

bsr 

$FC424A 

String ausgeben 

FC41EA 33FCFFFF000004EE 

move.w 

#•1,$4EE 

_dumpflg löschen 

FC41F2 4240 

clr.w 

DO 

alles ok 

FC41F4 4A9F 

tst.l 

(A7)+ 


FC41F6 4CDF30C0 

movem.1 

(A7)+,D6-D7/A4-A5 

Register zurückholen 

FC41FA 4E5E 

unlk 

A6 


FC41FC 4E75 

rts 






** Zeichen an Drucker ausgeben 

FC41FE 4E56FFFC 

link 

A6,#-4 


FC4202 4A3900002A4E 

tst.b 

$2A4E 

Druckerport 

FC4208 6722 

beq 

$FC422C 

RS 232? 

FC420A 102E0009 

move.b 

9(A6),D0 

auszugebendes Zeichen holen 

FC420E 4880 

ext.w 

DO 


FC4210 3E80 

move.w 

DO,(A7) 

und auf den Stack 

FC4212 102E0009 

move.b 

9(A6),D0 

auszugebendes Zeichen holen 

FC4216 4880 

ext.w 

DO 


FC4218 3F00 

move.w 

DO,•(A7) 

und nochmal auf den Stack 

FC421A 4EB900FC428A 

jsr 

$FC428A 

Drucker-Ausgabe 

FC4220 548F 

addq.1 

#2,A7 

Stackpointer korrigieren 

FC4222 4A40 

tst.w 

DO 

ok? 

FC4224 6604 

bne 

$FC422A 

ja 

FC4226 70FF 

moveq.1 

#•1,D0 

Fehler 

FC4228 601C 

bra 

$FC4246 

zum Funktionsende 

FC422A 6018 

bra 

SFC4244 


FC422C 102E0009 

move.b 

9(A6),D0 

auszugebendes Zeichen 

FC4230 4880 

ext.w 

DO 


FC4232 3E80 

move.w 

DO,(A7) 

auf den Stack 

FC4234 102E0009 

move.b 

9(A6),D0 

auszugebendes Zeichen 

FC4238 4880 

ext.w 

DO 


FC423A 3F00 

move.w 

DO,-(A7) 

nochmal auf den Stack 

FC423C 4EB900FC42B8 

jsr 

$FC42B8 

RS 232 Ausgabe 

FC4242 548F 

addq.1 

#2,A7 

Stackpointer korrigieren 

FC4244 4240 

clr.w 

DO 

ok 

FC4246 4E5E 

unlk 

A6 


FC4248 4E75 

rts 






*** String ausgeben 

FC424A 4E56FFFC 

l ink 

A6,#-4 


FC424E 6018 

bra 

$FC4268 

zum Schleifenende 

FC4250 206E0008 

move.1 

8(A6),AO 

Stringadresse 

FC4254 1010 

move.b 

(AO),D0 

Byte holen 

FC4256 4880 

ext.w 

DO 


FC4258 3E80 

move.w 

DO,(A7) 

Zeichen als Parameter 

FC425A 61A2 

bsr 

$FC41 FE 

Zeichen ausgeben 

FC425C 52AE0008 

addq.1 

#1,8(A6) 

Stringadresse erhöhen 

FC4260 4A40 

tst.w 

DO 

Ausgabe ok? 

FC4262 6704 

beq 

$FC4268 

ja 

FC4264 70FF 

moveq.1 

U- 1,D0 

Fehlercode 

FC4266 600C 

bra 

$FC4274 

zum Funktionsende 
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FC40E6 5247 

addq.w 

#1 ,D7 


FC40E8 4A3900007F22 

tst.b 

S7F22 


FC40EE 6704 

beq 

SFC40F4 


FC40F0 7002 

moveq.1 

#2, DO 


FC40F2 6002 

bra 

SFC40F6 


FC40F4 7001 

moveq.1 

#1,00 


FC40F6 BE40 

cmp.w 

D0,D7 


FC40F8 60B6 

btt 

SFC40B0 


FC40FA 4A3900008842 

tst.b 

$8842 


FC4100 6738 

beq 

$FC413A 


FC4102 2EBC00FD300B 

move.1 

#$FD300B,(A7) 

ESC, '1' 

FC4108 61000140 

bsr 

SFC424A 

String ausgeben 

FC410C 4A40 

tst.w 

DO 

ok? 

FC410E 670E 

beq 

SFC41IE 

ja 

FC4110 33FCFFFF000004EE 

move.w 

#*1,$4EE 

dumpfig löschen 

FC4118 70FF 

moveq.1 

#* 1,D0 

Flag für Fehler 

FC411A 600000D8 

bra 

SFC41F4 

abbrechen 

FC411E 3EBC000A 

move.w 

#$A,<A7) 

LF 

FC4122 610000DA 

bsr 

SFC41FE 

Zeichen an Drucker ausgeben 

FC4126 4A40 

tst.w 

DO 

ok? 

FC4128 670E 

beq 

*FC4138 

ja 

FC412A 33FCFFFF000004EE 

move.w 

#•1,$4EE 

dumpfig löschen 

FC4132 70FF 

moveq.1 

#* 1,D0 

Flag für Fehler 

FC4134 600000BE 

bra 

SFC41F4 

abbrechen 

FC4138 6060 

bra 

$FC419A 


FC413A 4247 

clr.w 

D7 


FC413C 6038 

bra 

SFC4176 


FC413E 2EBC00FD300F 

move.1 

#$FD300F,(A7) 

ESC, *3', 1 

FC4144 61000104 

bsr 

$FC424A 

String ausgeben 

FC4148 4A40 

tst.w 

DO 

ok? 

FC414A 670E 

beq 

SFC415A 

ja 

FC414C 33FCFFFF000004EE 

move.w 

#•1,$4EE 

_dumpflg löschen 

FC4154 70FF 

moveq.1 

#• 1,D0 

Flag für Fehler 

FC4156 6000009C 

bra 

SFC41F4 

abbrechen 

FC415A 3EBC000A 

move.w 

#$A,(A7) 

LF 

FC415E 6100009E 

bsr 

SFC41FE 

Zeichen an Drucker ausgeben 

FC4162 4A40 

tst.w 

DO 

ok? 

FC4164 670E 

beq 

SFC4174 

ja 

FC4166 33FCFFFF000004EE 

move.w 

#-1,$4EE 

dumpfig löschen 

FC416E 70FF 

moveq.1 

#-1,D0 

Flag für Fehler 

FC4170 60000082 

bra 

SFC41F4 

abbrechen 

FC4174 5247 

addq.w 

#1,D7 


FC4176 4A3900007F22 

tst.b 

S7F22 


FC417C 670E 

beq 

$FC418C 


FC417E 303900008782 

move.w 

$8782,DO 


FC4184 C1FC0006 

muls.w 

#6,00 


FC4188 5740 

subq.w 

#3, DO 


FC418A 600A 

bra 

$FC4196 


FC418C 303900008782 

move.w 

$8782,DO 


FC4192 E540 

asl .w 

#2, DO 


FC4194 5540 

subq.w 

#2, DO 


FC4196 BE40 

cmp.w 

D0,D7 


FC4198 60A4 

btt 

$FC413E 


FC419A 3039000075B2 

move.w 

$75B2,D0 


FC41A0 E340 

asl .w 

#1 ,D0 


FC41A2 48C0 

ext.l 

DO 


FC41A4 D1B900007DEA 

add.l 

D0,$7DEA 


FC41AA 30390000879A 

move.w 

$879A,D0 


FC41B0 Dl7900001708 

add.w 

DO,$1708 
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FC4006 

B0790000755E 

FC400C 

6D00FB44 

FC4010 

3E8C000D 

FC4014 

610001E8 

FC4018 

4A40 

FC401A 

670E 

FC401C 

33FCFFFF000004EE 

FC4024 

70FF 

FC4026 

600001CC 

FC402A 

527900008844 

FC4030 

4A3900007F00 

FC4036 

670C 

FC4038 

4A3900008788 

FC403E 

6604 

FC4040 

7003 

FC4042 

6002 

FC4044 

7001 

FC4046 

B07900008844 

FC404C 

6E00F9F4 

FC4050 

2EBC00FD3001 

FC4056 

610001F2 

FC405A 

4A40 

FC405C 

670E 

FC405E 

33FCFFFF000004E E 

FC4066 

70FF 

FC4068 

6000018A 

FC406C 

3EBC000A 

FC4070 

6100018C 

FC4074 

4A40 

FC4076 

670E 

FC4078 

33FCFFFF000004EE 

FC4080 

70FF 

FC4082 

60000170 

FC4086 

527900007F24 

FC408C 

4A39000087A0 

FC4092 

6704 

FC4094 

7001 

FC4096 

6002 

FC4098 

7002 

FC409A 

B07900007F24 

FC40A0 

6E00F996 

FC40A4 

4A39000087A0 

FC40AA 

674E 

FC40AC 

4247 

FC40AE 

6038 

FC40B0 

2EBC00FD3006 

FC40B6 

61000192 

FC40BA 

4A40 

FC40BC 

670E 

FC40BE 

33FCFFFF000004EE 

FC40C6 

70FF 

FC40C8 

6000012A 

FC40CC 

3EBC000A 

FC4000 

6100012C 

FC40D4 

4A40 

FC4006 

670E 

FC4008 

33FCFFFF000004EE 

FC40E0 

70FF 

FC40E2 

60000110 


cmp.w 

S755E,D0 

blt 

SFC3B52 

move.w 

#$D,(A7) 

bsr 

SFC41FE 

tst.w 

DO 

beq 

SFC402A 

move.w 

#•1,$4EE 

moveq.1 

#-1,D0 

bra 

SFC41F4 

addq.w 

#1,$8844 

tst.b 

S7F00 

beq 

SFC4044 

tst.b 

$8788 

bne 

SFC4044 

moveq.1 

#3,DO 

bra 

SFC4046 

moveq.1 

#1 ,D0 

cmp.w 

$8844,DO 

bgt 

$FC3A42 

move.1 

#$FD3001,(A7) 

bsr 

$FC424A 

tst.w 

DO 

beq 

$FC406C 

move.w 

#-1,$4EE 

moveq.1 

#-1,D0 

bra 

$FC41F4 

move.w 

#$A,(A7) 

bsr 

$FC41 FE 

tst.w 

DO 

beq 

$FC4086 

move.w 

#-1,$4EE 

moveq.1 

#* 1,D0 

bra 

$FC41F4 

addq.w 

#1,$7F24 

tst.b 

$87A0 

beq 

$FC4098 

moveq.1 

#1,D0 

bra 

$FC409A 

moveq.1 

#2, DO 

cmp.w 

$7F24,D0 

bgt 

$FC3A38 

tst.b 

$87A0 

beq 

$FC40FA 

clr.w 

D7 

bra 

$FC40E8 

move.1 

#$FD3006,(A7) 

bsr 

$FC424A 

tst.w 

DO 

beq 

$FC40CC 

move.w 

#-1,$4EE 

moveq.1 

#-1,D0 

bra 

$FC41F4 

move.w 

#$A,(A7) 

bsr 

$FC41 FE 

tst.w 

DO 

beq 

$FC40E6 

move.w 

#* 1,$4EE 

moveq.1 

#-1,D0 

bra 

$FC41F4 


CR 

Zeichen an Drucker ausgeben 

ok? 

ja 

dumpfig löschen 
Flag für Fehler 
abbrechen 


ESC, *3', 1 
String ausgeben 
ok? 
ja 

_dumpflg löschen 
Flag für Fehler 
abbrechen 
LF 

Zeichen an Drucker ausgeben 

ok? 

ja 

dumpfig löschen 
Flag für Fehler 
abbrechen 

Qualitäts-Modus? 

nein 


Qualitäts-Modus? 
nein 


ESC, '3', 1 
String ausgeben 
ok? 
ja 

dumpfig löschen 
Flag für Fehler 
abbrechen 
LF 

Zeichen an Drucker ausgeben 

ok? 

ja 

_dumpflg löschen 
Flag für Fehler 
abbrechen 
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FC3F22 10306000 

move.b 

<A0,D6.w),D0 


FC3F26 4880 

ext.w 

00 


FC3F28 7207 

moveq.1 

#7,D1 


FC3F2A 9247 

sub.w 

D7,D1 


FC3F2C E260 

asr.w 

Dl,DO 


FC3F2E C07C0001 

and.w 

#1 ,D0 


FC3F32 C1F9000087C8 

muls.w 

S87C8,D0 


FC3F38 1239000068EE 

move.b 

$68EE,D1 


FC3F3E 0200 

add.b 

DO,Dl 


FC3F40 13C1000068EE 

move.b 

D1.S68EE 


FC3F46 3039000087C8 

move.w 

$87C8,D0 


FC3F4C 48C0 

ext.l 

DO 


FC3F4E 81FC0002 

divs.w 

#2, DO 


FC3F52 33C0000087C8 

move.w 

D0,$87C8 


FC3F58 5246 

addq.w 

#1,06 


FC3F5A BC7C0008 

cmp.w 

#8,D6 


FC3F5E 6DBC 

blt 

SFC3F1C 


FC3F60 1039000068EE 

move.b 

$68EE,D0 


FC3F66 4880 

ext.w 

DO 


FC3F68 3E80 

move.w 

DO,(A7) 


FC3F6A 61000292 

bsr 

SFC41FE 

2eichen an Drucker ausgeben 

FC3F6E 4A40 

tst.w 

DO 

ok? 

FC3F70 670E 

beq 

SFC3F80 

ja 

FC3F72 33FCFFFF000004EE 

move.w 

#•1,$4EE 

dumpfig löschen 

FC3F7A 70FF 

moveq.1 

U- 1,00 

Flag für Fehler 

FC3F7C 60000276 

bra 

JFC41F4 

abbrechen 

FC3F80 4A39000087A2 

tst.b 

S87A2 


FC3F86 6704 

beq 

SFC3F8C 


FC3F88 4240 

clr.w 

DO 


FC3F8A 6002 

bra 

SFC3F8E 


FC3F8C 7001 

moveq.1 

#1,D0 


FC3F8E 13C0000087A2 

move.b 

D0,$87A2 


FC3F94 5247 

addq.w 

#1,D7 


FC3F96 3039000087C4 

move.w 

$87C4,D0 


FC3F9C 5840 

addq.w 

#4, DO 


FC3F9E BE40 

cmp.w 

D0,D7 


FC3FA0 6D00FF68 

blt 

$FC3F0A 


FC3FA4 4A3900007F22 

tst.b 

$7F22 


FC3FAA 6728 

beq 

$FC3FD4 


FC3FAC 4A39000087A2 

tst.b 

S87A2 


FC3FB2 6720 

beq 

SFC3FD4 


FC3FB4 1039000068EE 

move.b 

S68EE,D0 


FC3FBA 4880 

ext.w 

DO 


FC3FBC 3E80 

move.w 

DO,(A7) 


FC3FBE 6100023E 

bsr 

SFC41FE 

Zeichen an Drucker ausgeben 

FC3FC2 4A40 

tst.w 

DO 

ok? 

FC3FC4 670E 

beq 

SFC3FD4 

ja 

FC3FC6 33FCFFFF000004EE 

move.w 

#* 1,S4EE 

dunpflg löschen 

FC3FCE 70FF 

moveq. 

l #-1,D0 

Flag für Fehler 

FC3FD0 60000222 

bra 

SFC41F4 

abbrechen 

FC3FD4 5279000087CA 

addq.w 

#1 ,$87CA 


FC3FDA 0C79000F000087CA 

cmp.w 

#$F,$87CA 


FC3FE2 6F16 

ble 

SFC3FFA 


FC3FE4 303900007E9A 

move.w 

S7E9A.D0 


FC3FEA E340 

asl .w 

#1 ,D0 


FC3FEC 48C0 

ext.l 

DO 


FC3FEE D1B90000878C 

add.l 

D0,$878C 


FC3FF4 4279000087CA 

clr.w 

S87CA 


FC3FFA 527900001706 

addq.w 

#1,$1706 


FC4000 303900001706 

move.w 

$1706,00 
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FC3E54 D1FC00007F26 

add. 1 

#$7F26,A0 

FC3E5A 022800010001 

and.b 

#1,1(A0) 

FC3E60 6018 

bra 

SFC3E7A 

FC3E62 3047 

move.w 

07,A0 

FC3E64 D1C8 

add. 1 

A0,A0 

FC3E66 D1FC000075BC 

add. 1 

#$75BC,A0 

FC3E6C 0C500003 

cmp.w 

#3,(A0) 

FC3E70 6F08 

ble 

SFC3E7A 

FC3E72 13FC000100008798 

move.b 

#1,$8798 

FC3E7A 4A3900008798 

tst.b 

$8798 

FC3E80 671A 

beq 

$FC3E9C 

FC3E82 3047 

move.w 

07,A0 

FC3E84 D0C8 

add.w 

A0,A0 

FC3E86 D1FC00007F26 

add. 1 

#$7F26,A0 

FC3E8C 4210 

clr.b 

<A0) 

FC3E8E 3047 

move.w 

07,A0 

FC3E90 D0C8 

add.w 

A0,A0 

FC3E92 D1FC00007F26 

add. 1 

#$7F26,A0 

FC3E98 42280001 

clr.b 

1(A0) 

FC3E9C 207900002A6A 

move.1 

$2A6A,A0 

FC3EA2 3247 

move.w 

07,AI 

FC3EA4 D3C9 

add. 1 

AI,AI 

FC3EA6 D3FC00008790 

add. 1 

#$8790,AI 

FC3EAC 3251 

move.w 

(AI),AI 

FC3EAE D2C9 

add.w 

AI,AI 

FC3EB0 10309000 

move.b 

(A0,A1.W),D0 

FC3EB4 4880 

ext.w 

00 

FC3EB6 3F00 

move.w 

DO,•(A7) 

FC3EB8 3047 

move.w 

07,A0 

FC3EBA D0C8 

add.w 

A0,A0 

FC3EBC D1FC00007F26 

add. 1 

#$7F26,A0 

FC3EC2 1010 

move.b 

(A0),00 

FC3EC4 805F 

or.w 

(A7)*,D0 

FC3EC6 1080 

move.b 

D0,(A0) 

FC3EC8 207900002A6A 

move.1 

$2A6A,A0 

FC3ECE 3247 

move.w 

D7,A1 

FC3ED0 D3C9 

add. 1 

AI,AI 

FC3ED2 D3FC00008790 

add. 1 

#$8790,AI 

FC3ED8 3251 

move.w 

(AI),AI 

FC3EDA D2C9 

add.w 

AI,AI 

FC3EDC 10309001 

move.b 

1 (A0,Al.w),00 

FC3EE0 4880 

ext.w 

00 

FC3EE2 3F00 

move.w 

00,-(A7) 

FC3EE4 3047 

move.w 

07,AO 

FC3EE6 D0C8 

add.w 

AO, AO 

FC3EE8 D1FC00007F26 

add. 1 

#$7F26,A0 

FC3EEE 10280001 

move.b 

1(A0),00 

FC3EF2 805F 

or.w 

(A7)+,D0 

FC3EF4 11400001 

move.b 

DO,1(AO) 

FC3EF8 5247 

addq.w 

#1 ,D7 

FC3EFA BE7900008782 

cmp.w 

$8782,07 

FC3F00 6D00FE56 

blt 

$FC3D58 

FC3F04 7E04 

moveq.1 

#4,07 

FC3F06 6000008E 

bra 

$FC3F96 

FC3F0A 4239000068EE 

clr.b 

$68EE 

FC3F10 33FC0080000087C8 

move.w 

#$80,$87C8 

FC3F18 4246 

clr.w 

06 

FC3F1A 603E 

bra 

$FC3F5A 

FC3F1C 207C00007F26 

move.l 

#$7F26,A0 
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FC3D8C 0C79000100008844 

emp.w 

#1,$8844 

FC3D94 6600008C 

bne 

SFC3E22 

FC3098 3047 

move.w 

07, A0 

FC309A D1C8 

add.l 

A0,A0 

FC309C D1FC000075BC 

add.l 

#$75BC,A0 

FC30A2 0C500006 

emp.w 

#6,(A0) 

FC30A6 6630 

bne 

SFC3DD8 

FC30A8 3047 

move.w 

D7,A0 

FC30AA 01C8 

add.l 

A0,A0 

FC30AC D1FC00008790 

add.l 

#$8790,A0 

FC30B2 0C500008 

emp.w 

#8,(A0) 

FC30B6 6C20 

bge 

SFC3DD8 

FC30B8 3047 

move.w 

D7,A0 

FC3DBA D0C8 

add.w 

AO.AO 

FC30BC D1FC00007F26 

add.l 

#$7F26,A0 

FC30C2 02100001 

and.b 

#1,(AO) 

FC30C6 3047 

move.w 

D7,A0 

FC30C8 D0C8 

add.w 

AO.AO 

FC30CA D1FC00007F26 

add.l 

«S7F26.A0 

FC3OD0 022800040001 

and.b 

#4,1(AO) 

FC30D6 6048 

bra 

SFC3E20 

FC30D8 3047 

move.w 

D7,A0 

FC300A D1C8 

add.l 

A0,A0 

FC30DC DlFC000075BC 

add.l 

#$75BC,A0 

FC3DE2 OC500002 

emp.w 

#2,(AO) 

FC30E6 6730 

beq 

SFC3E18 

FC3DE8 3047 

move.w 

D7,A0 

FC3DEA D1C8 

add.l 

AO.AO 

FC30EC D1FC000075BC 

add.l 

#$75BC,A0 

FC30F2 0C500003 

emp.w 

#3,(AO) 

FC30F6 6720 

beq 

SFC3E18 

FC30F8 3047 

move.w 

D7,A0 

FC30FA D1C8 

add.l 

AO.AO 

FC3DFC D1FC000075BC 

add. 1 

#$75BC,A0 

FC3E02 0C500006 

emp.w 

#6,(AO) 

FC3E06 6710 

beq 

SFC3E18 

FC3E08 3047 

move.w 

D7.A0 

FC3E0A D1C8 

add. 1 

AO.AO 

FC3E0C D1FC000075BC 

add. 1 

#$75BC,A0 

FC3E12 0C500007 

emp.w 

#7,(AO) 

FC3E16 6608 

bne 

SFC3E20 

FC3E18 13FC000100008798 

move.b 

#1,$8798 

FC3E20 6058 

bra 

$FC3E7A 

FC3E22 3047 

move.w 

D7.A0 

FC3E24 D1C8 

add.l 

AO.AO 

FC3E26 D1FC000075BC 

add.l 

#$75BC,A0 

FC3E2C 0C500006 

emp.w 

#6,(AO) 

FC3E30 6630 

bne 

$FC3E62 

FC3E32 3047 

move.w 

D7.A0 

FC3E34 D1C8 

add.l 

AO.AO 

FC3E36 D1FC00008790 

add. 1 

#$8790,AO 

FC3E3C 0C500008 

emp.w 

#8,(AO) 

FC3E40 6C20 

bge 

$FC3E62 

FC3E42 3047 

move.w 

D7.A0 

FC3E44 D0C8 

add.w 

AO.AO 

FC3E46 D1FC00007F26 

add.l 

«7F26.A0 

FC3E4C 02100004 

and.b 

#4,(AO) 

FC3E50 3047 

move.w 

D7.A0 

FC3E52 D0C8 

add.w 

AO.AO 
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FC3CA6 D1FC00007F26 

add.l 

#$7F26,A0 

FC3CAC 3279000087D2 

move.w 

$8702,Al 

FC3CB2 D3C9 

add. 1 

AI,AI 

FC3CB4 D3FC000087A4 

add.l 

#$87A4,A1 

FC3CBA 3251 

move.w 

(AI),Al 

FC3CBC D2C9 

add.w 

AI,AI 

FC3CBE D3F900002A6A 

add. 1 

S2A6A,AI 

FC3CC4 1091 

move.b 

(AI),(A0) 

FC3CC6 3047 

move.w 

07,A0 

FC3CC8 D0C8 

add.w 

A0,A0 

FC3CCA D1FC00007F26 

add.l 

#$7F26,A0 

FC3CD0 3279000087D2 

move.w 

$8702,AI 

FC3CD6 D3C9 

add. 1 

AI,AI 

FC3CD8 D3FC000087A4 

add.l 

#$87A4,A1 

FC3C0E 3251 

move.w 

(AI),AI 

FC3CE0 D2C9 

add.w 

AI,AI 

FC3CE2 D3F900002A6A 

add. 1 

S2A6A.A1 

FC3CE8 116900010001 

move.b 

1(A1),1(A0) 

FC3CEE 3047 

move.w 

07,A0 

FC3CF0 D1C8 

add. 1 

A0,A0 

FC3CF2 01FC000075BC 

add.l 

#$75BC,A0 

FC3CF8 3279000087D2 

move.w 

$8702,AI 

FC3CFE D3C9 

add.l 

AI, Al 

FC3D00 D3FC00007DCA 

add.l 

#$7DCA,AI 

FC3006 3091 

move.w 

(AI),(A0) 

FC3D08 3047 

move.w 

07,A0 

FC3D0A D1C8 

add.l 

A0,A0 

FC3D0C D1FC00008790 

add. 1 

#$8790,AO 

FC3D12 3279000087D2 

move.w 

$8702,AI 

FC3D18 D3C9 

add. 1 

AI,AI 

FC3D1A D3FC00007F02 

add.l 

#$7F02,A1 

FC3D20 3091 

move.w 

(AI),(AO) 

FC3D22 303900007DC8 

move.w 

$7DC8,D0 

FC3D28 E340 

asl .w 

#1 ,D0 

FC3D2A 48C0 

ext.l 

00 

FC302C D1B90000808E 

add.l 

D0,$808E 

FC3D32 5247 

addq.w 

#1,07 

FC3D34 BE7900008782 

cmp.w 

$8782,D7 

FC3D3A 6000FEDE 

blt 

$FC3C1A 

FC303E 4A3900007F00 

tst.b 

$7F00 

FC3044 670001 BE 

beq 

$FC3F04 

FC3D48 4A3900008788 

tst.b 

$8788 

FC304E 660001B4 

bne 

$FC3F04 

FC3052 4247 

clr.w 

D7 

FC3054 600001A4 

bra 

$FC3EFA 

FC3D58 423900008798 

clr.b 

$8798 

FC3D5E 4A7900008844 

tst.w 

$8844 

FC3064 6626 

boe 

$FC308C 

FC3D66 3047 

move.w 

D7,A0 

FC3068 D1C8 

add.l 

A0,A0 

FC3D6A 227C000075BC 

move.1 

#$75BC,A1 

FC3070 30309800 

move.w 

(A0,A1.1),D0 

FC3074 48C0 

ext.l 

DO 

FC3076 81FC0002 

divs.w 

#2,00 

FC3D7A 4840 

swap 

DO 

FC307C 4A40 

tst.w 

DO 

FC307E 6708 

beq 

$FC3D88 

FC3080 13FC000100008798 

move.b 

#1,$8798 

FC3D88 600000FQ 

bra 

$FC3E7A 
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FC3BAC 

30390000879A 

move.w 

FC3BB2 

600E 

bra 

FC3BB4 

4240 

clr.w 

FC3BB6 

303900002A58 

move.w 

FC3BBC 

907900001708 

sub.w 

FC3BC2 

33C000008782 

move.w 

FC3BC8 

4240 

clr.w 

FC3BCA 

303900002A58 

move.w 

FC3BD0 

907900001708 

sub.w 

FC3BD6 

4840 

swap 

FC3BD8 

4240 

clr.w 

FC3BDA 

4840 

swap 

FC38DC 

80F90000879A 

divu.w 

FC3BE2 

670C 

beq 

FC3BE4 

33F90000879A00008782 

move.w 

FC3BEE 

601A 

bra 

FC3BF0 

4240 

clr.w 

FC3BF2 

303900002A58 

move.w 

FC3BF8 

907900001708 

sub.w 

FC3BFE 

33C000008782 

move.w 

FC3C04 

423900008842 

clr.b 

FC3C0A 

23F90000878C0000808E 

move.1 

FC3C14 

4247 

clr.w 

FC3C16 

600001 IC 

bra 

FC3C1A 

4279000087D2 

clr.w 

FC3C20 

33 F COO01000087C6 

move.w 

FC3C28 

23F90000808E00007EF0 

move.1 

FC3C32 

4246 

clr.w 

FC3C34 

6030 

bra 

FC3C36 

207900007EFO 

move.1 

FC3C3C 

3010 

move.w 

FC3C3E 

720F 

moveq.1 

FC3C40 

9279000087CA 

sub.w 

FC3C46 

E260 

asr.w 

FC3C48 

C07C0001 

and.w 

FC3C4C 

C1F9000087C6 

muls.w 

FC3C52 

D179000087D2 

add.w 

FC3C58 

54B900007EF0 

addq.1 

FC3C5E 

ElF9000087C6 

asl.w 

FC3C64 

5246 

addq.w 

FC3C66 

BC7900007E9A 

cmp.w 

FC3C6C 

6DC8 

blt 

FC3C6E 

4A3900008788 

tst.b 

FC3C74 

672C 

beq 

FC3C76 

3039000087D2 

move.w 

FC3C7C 

32390000882E 

move.w 

FC3C82 

B340 

eor.w 

FC3C84 

660C 

bne 

FC3C86 

207900002A6A 

move.1 

FC3C8C 

1010 

move.b 

FC3C8E 

4880 

ext.w 

FC3C90 

6002 

bra 

FC3C92 

4240 

clr.w 

FC3C94 

3247 

move.w 

FC3C96 

D3FC00007F26 

add.l 

FC3C9C 

1280 

move.b 

FC3C9E 

60000082 

bra 

FC3CA2 

3047 

move.w 

FC3CA4 

D0C8 

add.w 


$879A,D0 

SFC3BC2 

DO 

$2A58,D0 pjieight 

$1708,00 
DO,$8782 
DO 

$2A58,D0 pheight 

$1708,DO 

DO 

DO 

DO 

$879A,D0 

$FC3BF0 

$879A,$8782 

$FC3C0A 

DO 

$2A58,D0 pheight 

$1708,00 

DO,$8782 

$8842 

$878C,$808E 

D7 

$FC3D34 

$87D2 

#1,$87C6 

$808E,$7EF0 

D6 

$FC3C66 

$7EF0,A0 

(AO),DO 

#15,Dl 

$87CA,D1 

Dl,DO 

#1 ,D0 

$87C6,D0 

D0,$87D2 

#2,$7EF0 

$87C6 

#1 ,D6 

$7E9A,D6 

$FC3C36 

$8788 

$FC3CA2 

$87D2,D0 

$882E,D1 

Dl,DO 

$FC3C92 

$2A6A,A0 

(AO),DO 

DO 

$FC3C94 

DO 

D7,A1 
#$7F26,A1 
DO,(AI) 

$FC3D22 

D7,A0 

AO,AO 
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*************************************************************** 

VDI ESC 3, Enter Alpha Mode 

FC44B4 6108 

bsr 

SFC44BE 

ESC E, Clear Home 

FC44B6 60000160 

bra 

SFC4618 

ESC e, Cursor ein 

VDI ESC 2, Exit Alpha Mode 




FC44BA 6100017C 

bsr 

SFC4638 

ESC f, Cursor aus 

ESC E, Clear Home 




FC44BE 614A 

bsr 

SFC450A 

ESC H, Cursor Home 

FC44C0 6050 

bra 

SFC4512 

ESC J, Rest des Bildschirms löschen 

ESC A, VDI ESC 4, Cursor hoch 




FC44C2 322CFFEC 

move.w 

*20<A4),D1 

aktuelle Cursorzeile 

FC44C6 67E0 

beq 

SFC44A8 

null, schon fertig 

FC44C8 5341 

subq.w 

#1,01 

eins abziehen 

FC44CA 302CFFEA 

move.w 

•22(A4),D0 

aktuelle Cursorspalte 

FC44CE 60000586 

bra 

SFC4A56 

Cursor neu setzen 




ESC B, VDI ESC 5, Cursor down 

FC44D2 322CFFEC 

move.w 

•20(A4),01 

aktuelle Cursorzeile 

FC44D6 B26CFFDC 

cmp.w 

•36(A4),D1 

mit maximaler Cursorzeile vergleichen 

FC44DA 67CC 

beq 

SFC44A8 

schon in unterster Zeile? 

FC440C 5241 

addq.w 

#1 ,D1 

eins addieren 

FC44DE 302CFFEA 

move.w 

•22(A4),D0 

Cursorspalte 

FC44E2 60000572 

bra 

SFC4A56 

Cursor neu setzen 

************************************** 

************************* 

ESC C, VDI ESC 6, Cursor rechts 

FC44E6 302CFFEA 

move.w 

•22(A4),D0 

aktuelle Cursorspalte 

FC44EA B06CFFDA 

cmp.w 

•38(A4),00 

mit maximaler Spalte vergleichen 

FC44EE 67B8 

beq 

SFC44A8 

schon in letzter Spalte? 

FC44F0 5240 

addq.w 

#1,00 

eins addieren 

FC44F2 322CFFEC 

move.w 

-20(A4),D1 

aktuelle Cursorzeile 

FC44F6 6000055E 

bra 

SFC4A56 

Cursor neu setzen 

ESC D, BS, VDI ESC 7, Cursor links 




FC44FA 302CFFEA 

move.w 

•22(A4),D0 

aktuelle Cursorspalte 

FC44FE 67A8 

beq 

SFC44A8 

Cursor schon in erster Spalte? 

FC4500 5340 

subq.w 

#1 ,D0 

eins abziehen 

FC4502 322CFFEC 

move.w 

*20(A4),D1 

aktuelle Cursorzeile 

FC4506 6000054E 

bra 

SFC4A56 

Cursor neu setzen 

ESC H, VDI ESC 8, Cursor Home 




FC450A 4240 

clr.w 

00 

Spalte Null 

FC450C 4241 

clr.w 

Dl 

Zeile Null 

FC450E 60000546 

bra 

SFC4A56 

Cursor neu setzen 

*************************************************************** 

ESC J, VDI ESC 9, Rest des Bildschirms 

FC4512 6110 

bsr 

SFC4524 

ESC K, Rest der Zeile löschen löschen 

FC4514 362CFFDC 

move.w 

-36(A4),D3 

maximale Cursorzeile 

FC4518 B243 

cmp.w 

D3,D1 

mit maximaler Cursorzeile vergleichen 

FC451A 678C 

beq 

SFC44A8 

schon fertig 

FC451C 4240 

clr.w 

00 

Spalte Null 

FC451E 5241 

addq.w 

#1 ,D1 

Zeile erhöhen 

FC4520 60000166 

bra 

SFC4688 

ESC K, VDI ESC 10, Rest der Zeile löschen 



************************* 

FC4524 302CFFEA 

move.w 

*22(A4),D0 

aktuelle Cursorspalte 

FC4528 322CFFEC 

move.w 

*20(A4),D1 

aktuelle Cursorzeile 

FC452C 342CFFDA 

move.w 

•38(A4),D2 

maximale Cursorspalte 

FC4530 3601 

move.w 

Dl,03 


FC4532 60000154 

bra 

SFC4688 


******************** 

******************************************* 


FC4536 206C000E 

move.1 

14(A4),A0 

Adresse INTIN-Array 

FC453A 3210 

move.w 

(A0),D1 

INT IN [0] 

FC453C 5341 

subq.w 

#1,01 

Offset abziehen 

FC453E 30280002 

move.w 

2(A0),D0 

INTIN [1] 

FC4542 5340 

subq.w 

#1,00 

Offset abziehen 

FC4544 60000510 

bra 

SFC4A56 

Cursor setzen 
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VDI ESC 12, Textausgabe 


FC4548 206C000A 

move.1 

10(A4),A0 

Adresse CONTRL-Array 

FC454C 30280006 

move.w 

6(AO),DO 

Anzahl der Zeichen 

FC4550 206C000E 

move.1 

14(A4),A0 

Adresse INTIN-Array 

FC4554 600E 

bra 

SFC4564 

zum Schleifenende 

FC4556 3218 

move.w 

(A0)+,D1 

Zeichen aus INTIN holen 

FC4558 48E78080 

movem.1 

D0/A0,•(A7) 

Register retten 

FC455C 6100FDF2 

bsr 

SFC4350 

Zeichen ausgeben 

FC4560 4CDF0101 

movem.1 

(A7)*,D0/A0 

Register zurückholen 

FC4564 51C8FFF0 

dbra 

D0,SFC4556 

nächstes Zeichen 

FC4568 4E75 

rts 







FC456A 08040004 

bset 

#4,(A4) 

Cursorflag, reverse setzen 

FC456E 4E75 

rts 







FC4570 08940004 

bclr 

#4,(A4) 

Cursorflag, reverse löschen 

FC4574 4E75 

rts 







FC4576 206C000A 

move.1 

10(A4),A0 

Adresse CONTRL-Array 

FC457A 317C00020008 

move.w 

#2,8<A0) 

2 Ergebniswerte 

FC4580 206C0016 

move.1 

22(A4),A0 

Adresse INTOUT-Array 

FC4584 302CFFEC 

move.w 

•20(A4),D0 

aktuelle Cursorzeile 

FC4588 5240 

addq.w 

#1 ,D0 

plus Offset 

FC458A 30C0 

move.w 

DO,(A0)+ 

nach INTOUT[0] 

FC458C 302CFFEA 

move.w 

•22<A4),D0 

aktuelle Cursorspalte 

FC4590 5240 

addq.w 

#1 ,D0 

plus Offset 

FC4592 3080 

move.w 

DO,(A0) 

nach INTOUT [1] 

FC4594 4E75 

rts 







FC4596 7001 

moveq.1 

#1 ,D0 


FC4598 206C000A 

move.1 

10(A4),A0 

Adresse CONTRL-Array 

FC459C 31400008 

move.w 

D0,8(A0) 

ein Ergebniswert 

FC45A0 206C0016 

move.1 

22(A4),A0 

Adresse INTOUT-Array 

FC45A4 3080 

move.w 

D0,(A0) 

Tablet verfügbar 

FC45A6 4E75 

rts 







FC45A8 206C000E 

move.1 

14(A4),A0 

Adresse INTIN-Array 

FC45AC 4250 

clr.w 

(A0) 

kein Ergebniswert 

FC45AE 4EF900FCB17A 

jmp 

SFCB17A 

House Cursor einschalten 





FC45B4 4EF900FCB1A2 

jmp 

SFCB1A2 

Mouse Cursor ausschalten 





FC45BA 322CFFEC 

move.w 

- 20(A4),D1 

aktuelle Cursorzeile 

FC45BE 6600FF08 

bne 

SFC44C8 

nicht in oberster Zeile, Cursor hoch 

FC45C2 61000074 

bsr 

SFC4638 

ESC f, Cursor aus 

FC45C6 61000342 

bsr 

SFC490A 


FC45CA 603C 

bra 

SFC4608 

Cursor wieder einschalten 





FC45CC 616A 

bsr 

SFC4638 

ESC f, Cursor aus 

FC45CE 322CFFEC 

move.w 

*20(A4),D1 

aktuelle Cursorzeile 

FC45D2 61000336 

bsr 

SFC490A 

Rest des Bildschirms nach unten scrollen 

FC45D6 4240 

clr.w 

DO 

Spalte 0 

FC45D8 322CFFEC 

move.w 

*20(A4),D1 

aktuelle Cursorzeile 

FC45DC 61000478 

bsr 

SFC4A56 

Cursor setzen 

FC45E0 6026 

bra 

SFC4608 

Cursor wieder einschalten 





FC45E2 6154 

bsr 

SFC4638 

ESC f, Cursor aus 

FC45E4 322CFFEC 

move.w 

•20(A4),D1 

aktuelle Cursorzeile 
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FC45E8 610002BC 

FC45EC 60E8 

bsr 

bra 

SFC48A6 

SFC45D6 

Rest des Bildschirms nach oben schieben 

s.o. 

FC45EE 362CFFEC 

move.w 

-20(A4),D3 

ESC d, Bildschirm bis Cursor löschen 
aktuelle Cursorzeile 

FC45F2 67000088 

beq 

$FC467C 

ESC o, Zeile bis Cursor löschen 

FC45F6 4240 

ctr.w 

DO 


FC45F8 4241 

clr.w 

Dl 


FC45FA 342CFFDA 

move.w 

-38(A4),D2 

maximale Cursorspalte 

FC45FE 5343 

subq.w 

#1,D3 


FC4600 61000086 

bsr 

SFC4688 


FC4604 60000076 

bra 

JFC467C 

ESC o, Zeile bis Cursor löschen 

*************************************************************** 

Cursor wieder einschalten 

FC4608 302CFEAC 

move.w 

•340(A4),D0 


FC460C 6708 

beq 

SFC4616 


FC460E 5340 

subq.w 

#1 ,D0 


FC4610 6712 

beq 

SFC4624 


FC4612 3940FEAC 

move.w 

D0 f -340(A4) 


FC4616 4E75 rts 

*************************************************************** 

ESC e, Cursor einschalten 

FC4618 49F900002994 

lea 

$2994,A4 

Ad resse der LINE-A-Variablen 

FC461E 4A6CFEAC 

tst.w 

-340(A4) 

Cu rsor schon ein? 

FC4622 6730 

beq 

SFC4654 

ja , fertig 

FC4624 397C0001FEAC 

move.w 

#1,-340(A4) 


FC462A 226CFFE4 

move.1 

-28<A4),A1 

Ad resse der Cursorposition 

FC462E 600001C4 

bra 

SFC47F4** 


*************************************************************** 

ESC f, Cursor aus, Cursconfig, Funktion 

FC4632 49F900002994 

lea 

$2994,A4 

Adresse der LINE-A*Variablen 

FC4638 526CFEAC 

addq.w 

#1,-340(A4) 


FC463C 08940001 

bclr 

#1,(A4) 


FC4640 6712 

beq 

$FC4654 


FC4642 226CFFE4 

move.1 

-28(A4),A1 

Adresse der Cursorposition 

FC4646 60000430 

bra 

$FC4A78 

Zeichen invertieren 

ESC j, Cursorposition speichern 
Cursorflag, Position gespeichert 

FC464A 08040005 

bset 

#5,(A4) 

FC464E 296CFFEAFEB8 

move.1 

•22<A4),-328(A4) 

Cursorzeile und -spalte merken 

FC4654 4E75 

rts 


ESC k, Cursor auf gespeicherte Position 
Cursorflag, war Position gespeichert? 

FC4656 08940005 

bclr 

#5,(A4) 

FC465A 6700FEAE 

beq 

$FC450A 

nein, Cursor Home 

FC465E 302CFEB8 

move.w 

-328(A4),D0 

Cursorspalte 

FC4662 322CFEBA 

move.w 

-326(A4),D1 

Cursorzeile 

FC4666 600003EE 

bra 

$FC4A56 

Cursor neu setzen 

*************************************************************** 

ESC l, Zeile löschen 

FC466A 4240 

clr.w 

DO 


FC466C 322CFFEC 

move.w 

•20(A4),D1 

aktuelle Cursorzeile 

FC4670 342CFFDA 

move.w 

*38(A4),D2 

maximale Cursorspalte 

FC4674 3601 

move.w 

Dl ,D3 


FC4676 6110 

bsr 

$FC4688 


FC4678 600003DC 

bra 

$FC4A56 

Cursor setzen 

FC467C 4240 

clr.w 

DO 

ESC o, Zeile bis Cursor löschen 

FC467E 322CFFEC 

move.w 

-20(A4),D1 

aktuelle Cursorzeile 

FC4682 342CFFEA 

move.w 

•22(A4),D2 

aktuelle Cursorspalte 

FC4686 3601 

move.w 

D1,D3 


FC4688 61 AE 

bsr 

$FC4638 

ESC f, Cursor aus 

FC468A 610002FE 

bsr 

$FC498A 


FC468E 6000FF78 

bra 

$FC4608 

Cursor wieder einschalten 
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*************************************************************** 

ESC v, Zeilenwrap ausschalten 

FC4692 08040003 

bset 

#3,(A4) 

Cursorflag, Flag für neue Zeile 

FC4696 4E75 

rts 



*************************************************************** 

ESC w, Zeilenwrap einschalten 

FC4698 08940003 

bclr 

#3,(A4) 

Cursorflag, Flag für neue Zeile 

FC469C 4E75 

rts 



*************************************************************** 

CR, Cursor an Zeilenanfang 

FC469E 4240 

clr.w 

00 

Spalte Null 

FC46A0 322CFFEC 

move.w 

*20(A4),D1 

aktuelle Zeile 

FC46A4 600003B0 

bra 

SFC4A56 

Cursor neu setzen 

*************************************************************** 

LF, (VT, FF), Cursor nach unten 

FC46A8 322CFFEC 

move.w 

-20(A4),D1 

aktuelle Cursorzeile 

FC46AC B26CFFDC 

cmp.w 

-36(A4),D1 

mit maximaler Zeile vergleichen 

FC46B0 6600FE2A 

bne 

$FC44DC 

nicht in letzter Zeile, nur Cursor down 

FC46B4 6182 

bsr 

$FC4638 

ESC f, Cursor ausschalten 

FC46B6 4241 

clr.w 

Dl 


FC46B8 610001EC 

bsr 

SFC48A6 

Bildschirm nach oben scrollen 

FC46BC 6000FF4A 

bra 

SFC4608 

und Cursor wieder einschalten 

*************************************************************** 


FC46C0 49F900002994 

lea 

$2994,A4 

Adresse der LINE-A-Variablen 

FC46C6 4A6CFEAC 

tst.w 

-340(A4) 


FC46CA 6624 

bne 

SFC46F0 


FC46CC 532CFFEF 

subq.b 

#1,-17(A4) 

Cursor Blinkzähler dekrementieren 

FC4600 661E 

bne 

SFC46F0 


FC4602 196CFFEEFFEF 

move.b 

-18(A4),-17(A4) 

Blinkrate in Blinkzähler laden 

FC4608 08140000 

btst 

#0,(A4) 


FC460C 670C 

beq 

$FC46EA 


FC460E 08540001 

bchg 

#1,(A4) 


FC46E2 226CFFE4 

move.1 

-28(A4),A1 

Bildschirmadresse des Cursors 

FC46E6 60000390 

bra 

$FC4A78 

Zeichen an Cursorposition invertieren 

FC46EA 08040001 

bset 

#1,(A4) 


FC46EE 67F2 

beq 

SFC46E2 


FC46F0 4E75 

rts 



************************************* 

************************** 

Cursor Konfiguration 

FC46F2 49F900002994 

lea 

$2994,A4 

Adresse der LINE-A-Variablen 

FC46F8 302F0004 

move.w 

4(A7),D0 

Funktionsnummer 

FC46FC B07C0007 

cmp.w 

#7,DO 

größer 7 

FC4700 62EE 

bhi 

$FC46F0 

ja, ignorieren 

FC4702 D040 

add.w 

00,DO 

als Uortindex 

FC4704 30380006 

move.w 

$FC470C(PC,D0.w),D0 

relative Adresse holen 

FC4708 4EFB0002 

jnp 

$FC470C(PC,D0.w) 

Funktion ausführen 

************************************* 

************************** 

Sprungtabelle für Cursorkonfiguration 

FC470C FF26 

dc.w 

$FC4632-$FC470C 

Funktion 0, Cursor ausschalten (ESC f) 

FC470E FFOC 

dc.w 

$FC4618-$FC470C 

Funktion 1, Cursor einschalten (ESC e) 

FC4710 0010 

dc.w 

$FC471C-$FC470C 

Funktion 2, Cursor blinkend 

FC4712 0016 

dc.w 

$FC4722-$FC470C 

Funktion 3, Cursor stehend 

FC4714 001C 

dc.w 

$FC4728-$FC470C 

Funktion 4, Blinkrate setzen 

FC4716 0024 

dc.w 

$FC4730-$FC470C 

Funktion 5, Blinkrate holen 

FC4718 002C 

dc.w 

$FC4738-$FC470C 

Funktion 6, Cursorflag setzen 

FC471A 0036 

dc.w 

$FC4742-$FC470C 

Funktion 7, Cursorflag laden 

FC471C 08040000 

bset 

#0,(A4) 

Cursor blinkend 

FC4720 4E75 

rts 



************************** 

b************************************* 


FC4722 08940000 

bclr 

#0,(A4) 

Cursor feststehend 

FC4726 4E75 

rts 



FC4728 196F0007FFEE 

move.b 

7(A7),-18(A4) 

Cursor-Blinkrate setzen 

FC472E 4E75 

rts 
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FC4730 7000 

moveq.1 

#0,D0 


FC4732 102CFFEE 

move.b 

•18(A4),00 

Cursor-Blinkrate laden 

FC4736 4E75 

rts 



fr************************************************************** 

Cursconf, Funktion 6 

FC4738 102F0007 

move.b 

7(A7),D0 

Parameter holen 

FC473C 19400001 

move.b 

00,1(A4) 

als Cursorflag benutzen 

FC4740 4E75 

rts 






Cursconf, Funktion 7 

FC4742 7000 

moveq.1 

#0,00 


FC4744 102C0001 

move.b 

1(A4),D0 

Cursorflag laden 

FC4748 4E75 

rts 



FC474A 49F900002994 

lea 

S2994.A4 

Adresse der LINE-A-Variablen 

FC4750 B26CFFF6 

cmp.w 

-10<A4),D1 

AOE lo, kleinster ASCII-Code im Font 

FC4754 650000C0 

bcs 

SFC4816 


FC4758 B26CFFF4 

cmp.w 

-12(A4),D1 

ADE hi, größter ASCII-Code im Font 

FC475C 620000B8 

bhi 

SFC4816 


FC4760 206CFFFC 

move.1 

*4(A4),A0 

Zeiger auf Offsetdaten 

FC4764 D241 

add.w 

01,01 

Zeichen als Uortindex 

FC4766 32301000 

move.w 

<A0,Dl.w),D1 

Offsetdaten aus Tabelle holen 

FC476A E649 

Isr.w 

#3,01 

durch 8 ergibt Byteadresse 

FC476C 206CFFF0 

move.1 

-16(A4),A0 

Zeiger auf Fontdaten 

FC4770 D0C1 

add.w 

01,A0 

plus Offset 

FC4772 226CFFE4 

move.1 

-28(A4),A1 

Adresse der Cursorposition 

FC4776 3C2CFFE2 

move.w 

-30(A4),D6 

Vordergrundfarbe (Schrift) 

FC477A 3E2CFFE0 

move.w 

-32(A4),D7 

Hintergrundfarbe 

FC477E 08140004 

btst 

#4,(A4) 


FC4782 6702 

beq 

SFC4786 


FC4784 CD47 

exg 

06,07 


FC4786 526CFEAC 

addq.w 

#1,*340(A4) 


FC478A 08940001 

bclr 

#1,(A4) 


FC478E 2A6C0080 

move.1 

128(A4),A5 

Adresse der Routine 

FC4792 4E95 

jsr 

CA5) 

Routine ausführen 

FC4794 302CFFEA 

move.w 

-22(A4),D0 

aktuelle Cursorspalte 

FC4798 322CFFEC 

move.w 

-20(A4),D1 

aktuelle Cursorzeile 

FC479C B06CFFDA 

cmp.w 

-38(A4),D0 

mit maximaler Cursorspalte vergleichen 

FC47A0 6032 

blt 

SFC47D4 


FC47A2 08140003 

btst 

#3,(A4) 


FC47A6 674C 

beq 

SFC47F4 


FC47A8 4240 

clr.w 

DO 


FC47AA 342CFFDE 

move.w 

-34(A4),D2 

Bytes pro Zeile 

FC47AE 22790000044E 

move.1 

S44E,A1 

_v_bs_ad 

FC47B4 B26CFFDC 

cmp.w 

*36(A4),D1 

maximale Cursorzeile 

FC47B8 6012 

blt 

SFC47CC 


FC47BA 3941FFEC 

move.w 

Dl,-20(A4) 

aktuelle Cursorzeile 

FC47BE C2C2 

mulu.w 

D2,D1 


FC47C0 D3C1 

add.l 

Dl,AI 


FC47C2 4241 

clr.w 

Dl 


FC47C4 487A0026 

pea 

$FC47EC(PC) 

Rücksprungadresse auf Stack 

FC47C8 600000DC 

bra 

SFC48A6 


FC47CC 5241 

addq.w 

#1,01 


FC47CE C4C1 

mulu.w 

01,02 


FC47D0 D3C2 

add.l 

02,AI 


FC47D2 6014 

bra 

SFC47E8 


FC47D4 5249 

addq.w 

#1 ,A1 


FC47D6 5240 

addq.w 

#1 ,D0 


FC47D8 08000000 

btst 

#0,00 


FC47DC 660A 

bne 

SFC47E8 
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FC47DE 342C0006 

move.w 

6(A4),D2 

Anzahl Bildebenen 

FC47E2 D442 

add.w 

02,D2 

als Uortindex 

FC47E4 43F120FE 

lea 

-2(A1,D2.w),AI 


FC47E8 3941FFEC 

move.w 

D1,-20(A4) 

aktuelle Cursorzeile 

FC47EC 3940FFEA 

move.w 

DO,*22(A4) 

aktuelle Cursorspalte 

FC47F0 2949FFE4 

move.1 

Al,-28(A4) 

Adresse der Cursorposition 

FC47F4 1C2C0001 

move.b 

1(A4 >,D6 


FC47F8 6614 

bne 

JFC480E 


FC47FA 3E2CFEAC 

move.w 

*340(A4),D7 


FC47FE 5347 

subq.w 

#1 ,D7 


FC4800 6610 

bne 

SFC4812 


FC4802 61000274 

bsr 

SFC4A78 


FC4806 08040001 

bset 

#1,(A4) 


FC480A 1C2CFFEE 

move.b 

-18(A4),D6 

Cursor Blinkrate 

FC480E 1946FFEF 

move.b 

06,-17(A4) 

Cursor Blinkzähler 

FC4812 536CFEAC 

subq.w 

#1,-340(A4) 


FC4816 4E75 

rts 






Blit #1 

FC4818 4BF900FF8A3C 

lea 

SFF8A3C,A5 

Adresse Blitter-Start-Register 

FC481E 2449 

move.1 

AI, A2 

Destination Address 

FC4820 7401 

moveq. 

l #1,D2 


FC4822 3B42FFFA 

move.w 

D2,-6(A5) 

X-Count auf 1 

FC4826 3008 

move.w 

A0,D0 


FC4828 3209 

move.w 

AI,Dl 


FC482A C042 

and.w 

D2,D0 


FC482C E249 

Isr.w 

# 1,01 


FC482E D140 

addx.w 

DO,DO 


FC4830 D040 

add.w 

DO,DO 


FC4832 3B7B0052FFEC 

move.w 

$FC4886(PC,D0.w),-20(A5) 

Endmaskl 

FC4838 3B7B0054FFE4 

move.w 

$FC488E(PC,D0.w),-28(A5) 

Source X Increment 

FC483E 303B0056 

move.w 

$FC4896(PC,D0.w),D0 

Start, HOG, Skew, NFSR und FXSR 

FC4842 386CFFF8FFE6 

move.w 

-8(A4),-26CA5) 

formwidth als Source Y Increment 

FC4848 3B6C0008FFF4 

move.w 

8(A4),-12(A5) 

Bytes pro Zeile als Destination Y Increment 

FC484E 322CFFD8 

move.w 

-40(A4),D1 

Höhe des Characters als Y Count 

FC4852 342C0006 

move.w 

6(A4),D2 

Anzahl Bildebenen 

FC4856 5342 

subq.w 

#1 ,D2 

als dbra-Zähler 

FC4858 7807 

moveq.1 

#7,04 


FC485A 2B48FFE8 

move.1 

A0,-24(A5) 

Source Address 

FC485E 2B4AFFF6 

move.1 

A2,-10(A5) 

Destination Address 

FC4862 3841FFFC 

move.w 

Dl,-4(A5) 

Y Count 

FC4866 4243 

clr.w 

D3 


FC4868 E24E 

Isr.w 

#1 ,D6 


FC486A 0743 

addx.w 

03, D3 


FC486C E24F 

Isr.w 

#1,07 


FC486E D743 

addx.w 

D3,D3 


FC4870 D643 

add.w 

D3,D3 


FC4872 3B7B302AFFFE 

move.w 

$FC489E(PC,D3.w),-2(A5) 

HOP und OP 

FC4878 3A80 

move.w 

DO,(A5) 

Start, Skew, NFSR und FXSR 

FC487A 548A 

addq.1 

#2,A2 

Destination auf nächste Bildebene 

FC487C 4A55 

tst.w 

<A5) 

Blitter starten 

FC487E 6BFC 

bmi 

SFC487C 

noch busy? 

FC4880 51CAFFD8 

dbra 

D2.SFC485A 

nächste Bildebene 

FC4884 4E75 

rts 



*************************************************************** 

Endmask 1 

FC4886 FF00 

dc.w 

$FF00 


FC4888 00FF 

dc.w 

$00 FF 


FC488A FF00 

dc.w 

$FF00 


FC488C OOFF 

dc.w 

$00FF 
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Source X Increment 


FC488E 0000 

dc.w 

$0000 


FC4890 0000 

dc.w 

$0000 


FC4892 FFFF 

dc.w 

$FFFF 


FC4894 0000 

dc.w 

$0000 





***** Blitterstart und Skew, NFSR, 

FC4896 C000 

dc.w 

$C000 

Start, HOG 

FC4898 C008 

dc.w 

$C008 

Start, HOG, Skew 8 Bit 

FC489A C008 

dc.w 

$C008 

Start, HOG, Skew 8 Bit 

FC489C C000 

dc.w 

$C000 

Start, HOG 




***** HOP und OP 

FC489E 0200 

dc.w 

$0200 

HOP = Source 

FC48A0 020C 

dc.w 

$020C 

HOP = Source, OP = NOT Sour« 

FC48A2 0203 

dc.w 

$0203 

HOP = Source, OP = Source 

FC48A4 020F 

dc.w 

$020F 

HOP = Source, OP = •1•-Bits 

FC48A6 2A6C0084 

move.1 

132(A4),A5 

Adresse der Routine 

FC48AA 4ED5 

jmp 

(A5) 

Routine ausführen 

FC48AC 4BF900FF8A20 

lea 

$FF8A20,A5 

***** ßlit #2 

Zeiger auf Blitter 

FC48B2 7C02 

moveq.1 

#2,D6 


FC48B4 3AC6 

move.w 

D6,(A5)+ 

Source X Increment 

FC48B6 3AC6 

move.w 

D6,<A5)+ 

Source Y Increment 

FC48B8 3A2CFFDE 

move.w 

-34(A4),D5 

Bytes pro Zeile 

FC48BC 3805 

move.w 

05,04 


FC48BE C8C1 

mulu.w 

01,04 


FC48C0 24790000044E 

move.1 

$44E,A2 

_v_bs_ad 

FC48C6 D5C4 

add.l 

04, A2 


FC48C8 47F25000 

lea 

(A2,D5.w),A3 


FC48CC 2ACB 

move.1 

A3,(A5)+ 

Source Address 

FC48CE 7EFF 

moveq.1 

#-1,07 


FC48D0 2AC7 

move.1 

D7,(A5)+ 

Endmask 1 und 2 auf $F FFF 

FC4802 3AC7 

move.w 

D7,(A5)+ 

Endmask 3 auf $FFFF 

FC4804 3AC6 

move.w 

06,(A5)+ 

Destination X Increment auf 

FC4806 3AC6 

move.w 

06,(A5)+ 

Destination Y Increment auf 

FC48D8 2ACA 

move.1 

A2,(A5)+ 

Destination Address 

FC480A E245 

asr.w 

#1,05 


FC480C 362CFFDC 

move.w 

-36(A4),D3 

maximale Cursorzeile 

FC48E0 3403 

move.w 

D3,D2 


FC48E2 9441 

sub.w 

Dl,02 


FC48E4 6F18 

ble 

$FC48FE 


FC48E6 3AC5 

move.w 

D5,(A5)+ 

X-Count 

FC48E8 264D 

move.1 

A5, A3 


FC48EA 3AC2 

move.w 

02,(A5)+ 

Y-Count 

FC48EC 3AFC0203 

move.w 

#$203,<A5)+ 

HOP = Source, OP = Replace 

FC48F0 343C8000 

move.w 

#$8000,D2 

Busy-Bit setzen 

FC48F4 3A82 

move.w 

D2,(A5) 

Blitter starten 

FC48F6 7807 

moveq.1 

#7,D4 


FC48F8 0905 

bset 

D4,(A5) 

Blitter noch aktiv? 

FC48FA 4E71 

nop 



FC48FC 66FA 

bne 

$FC48F8 

ja, warten 

FC48FE 4240 

clr.w 

DO 


FC4900 342CFFDA 

move.w 

-38(A4),D2 

maximale Cursorspalte 

FC4904 3203 

move.w 

D3,D1 


FC4906 60000082 

bra 

$FC498A 


FC490A 2A6C0088 

move.1 

136<A4),A5 

Adresse der Routine 

FC490E 4ED5 

jmp 

(A5) 

Routine ausführen 



470 


Das große Mega-ST-Buch 





Blit #3 

FC4910 4BF900FF8A20 

lea 

SFF8A20.A5 

Zeiger auf Blitter 

FC4916 7CFE 

moveq.l 

#*2,D6 


FC4918 3AC6 

move.w 

D6,(A5)+ 

Source X Increment auf -2 

FC491A 425D 

clr.w 

(A5)+ 

Source Y Increment auf Null 

FC491C 3A2CFFDE 

move.w 

-34<A4),D5 

Bytes pro Zeile 

FC4920 3805 

move.w 

05,04 


FC4922 362CFFDC 

move.w 

•36<A4),D3 

maximale Cursorzeile 

FC4926 C8C3 

mulu.w 

D3,D4 


FC4928 26790000044E 

move.1 

$44E f A3 

_v_bs_ad 

FC492E 47F348FE 

lea 

-2(A3,D4.l),A3 


FC4932 2ACB 

move.1 

A3,(A5)+ 

Source Address 

FC4934 7EFF 

moveq.1 

#-1,07 


FC4936 2AC7 

move.1 

D7,(A5)+ 

Endnask 1 und 2 auf SFFFF 

FC4938 3AC7 

move.w 

D7,(A5)+ 

Endmask 3 auf SFFFF 

FC493A 3AC6 

move.w 

D6,(A5)+ 

Destination X Increment auf ■ 

FC493C 3AC6 

move.w 

D6,(A5)+ 

Destination Y Increment auf • 

FC493E 45F35000 

lea 

(A3,D5.w),A2 


FC4942 2ACA 

move.1 

A2,(A5)+ 

Destination Address 

FC4944 E245 

asr.w 

#1 ,D5 


FC4946 9641 

sub.w 

01,D3 


FC4948 6F16 

ble 

SFC4960 


FC494A 3AC5 

move.w 

D5,(A5)+ 

X-Count 

FC494C 264D 

move.1 

A5,A3 


FC494E 3AC3 

move.w 

D3,(A5)+ 

Y-Count 

FC4950 3AFC0203 

move.w 

#$203,<A5)+ 

HOP = Source, OP = Replace 

FC4954 3ABC8080 

move.w 

#$8080,(A5) 

Blitter starten, FXSR = 1 

FC4958 7407 

moveq.1 

#7,02 


FC495A 05D5 

bset 

02,(A5) 

Blitter noch busy? 

FC495C 4E71 

nop 



FC495E 66FA 

bne 

$FC495A 

ja, warten 

FC4960 4240 

clr.w 

DO 


FC4962 342CFFDA 

move.w 

-38(A4),D2 

maximale Cursorspalte 

FC4966 3601 

move.w 

Dl,03 


FC4968 6020 

bra 

$FC498A 


*************************************************************** 

Tabelle Endmasks 1 (Lo-Word) 

FC496A 0000FF00 

dc.l 

S0000FF00 


FC496E FF00FFFF 

dc.l 

SFF00FFFF 


FC4972 0000FFFF 

dc.l 

S0000FFFF 


FC4976 FFFFFFFF 

dc.l 

SFFFFFFFF 


FC497A 00000000 

dc.l 

$00000000 


FC497E FF0000FF 

dc.l 

$FF0000FF 


FC4982 000000FF 

dc.l 

$000000FF 


FC4986 FFFFOOFF 

dc.l 

$FFFF00FF 


FC498A 2A6C008C 

move.1 

140(A4),A5 

Adresse der Routine 

FC498E 4ED5 

Jmp 

(A5) 

Routine ausführen 




Blit #4 

FC4990 4BF900FF8A28 

lea 

$FF8A28,A5 

Zeiger auf Blitter Endmasks 

FC4996 3800 

move.w 

DO,04 


FC4998 3A02 

move.w 

02,05 


FC499A 4246 

clr.w 

06 


FC499C E24C 

Isr.w 

#1 ,D4 


FC499E DD46 

addx.w 

06,06 


FC49A0 E24D 

Isr.w 

#1,05 


FC49A2 DD46 

addx.w 

D6,D6 


FC49A4 9A44 

sub.w 

04,05 


FC49A6 56C7 

sne 

D7 


FC49A8 DE07 

add.b 

D7,D7 
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FC49AA E756 

roxi.w 

#3,06 


FC49AC 2E3B60BC 

move.1 

$FC496A(PC,D6.W),D7 

Endmasks 1 und 3 aus Tabelle holen 

FC49B0 3AC7 

move.w 

07,(A5)+ 

Endmask 1 

FC49B2 3AFCFFFF 

move.w 

#$FFFF,(A5)+ 

Endmask 2 auf SFFFF 

FC49B6 4847 

swap 

D7 


FC49B8 3AC7 

move.w 

D7,(A5)+ 

Endmask 3 

FC49BA 3E2CFFDE 

move.w 

-34(A4),D7 

Bytes pro Zeile 

FC49BE CECl 

mulu.w 

01,D7 


FC49C0 24790000044E 

move.1 

S44E.A2 

_v_bs_ad 

FC49C6 D5C7 

add.l 

D7,A2 


FC49C8 3C2C0006 

move.w 

6(A4),D6 

Anzahl Bildebenen 

FC49CC 3E06 

move.w 

D6,D7 


FC49CE DE47 

add.w 

D7,D7 


FC49D0 3AC7 

move.w 

07, (A5)+ 

Destination X Increment 

FC4902 C8C7 

mulu.w 

07,04 


FC4904 D4C4 

add.w 

04, A2 


FC49D6 3805 

move.w 

D5.D4 


FC4908 C8C7 

mulu.w 

D7,D4 


FC49DA 4444 

neg.w 

D4 


FC490C D86C0008 

add.w 

8(A4),D4 

plus Bytes pro Bildschirmzeile 

FC49E0 3AC4 

move.w 

D4,(A5)+ 

Destination Y Increment 

FC49E2 2ACA 

move.1 

A2,(A5)+ 

Destination Address 

FC49E4 5245 

addq.w 

#1,05 


FC49E6 3AC5 

move.w 

D5,(A5)+ 

X-Count 

FC49E8 264D 

move.1 

A5,A3 


FC49EA 5880 

addq.l 

#4, A5 


FC49EC 3803 

move.w 

03,D4 


FC49EE 9841 

sub.w 

Dl ,D4 


FC49F0 5244 

addq.w 

#1 ,D4 


FC49F2 C8ECFFD8 

mulu.w 

•40(A4),D4 

mal Höhe des Characters 

FC49F6 363C8000 

move.w 

#$8000,03 

Busy-Bit setzen, kein Skew 

FC49FA 5346 

subq.w 

#1 ,D6 


FC49FC 3E2CFFE0 

move.w 

-32(A4),D7 

Hintergrundfarbe 

FC4A00 2B4AFFF6 

move.1 

A2,-10(A5) 

Destination Address 

FC4A04 3684 

move.w 

D4,(A3) 


FC4A06 E24F 

Isr.w 

#1 ,D7 

nächstes Bit der Hintergrundfarbe ins Carry 

FC4A08 55EDFFFF 

scs 

•1(A5) 

OP = 0 < 1 0 1 -Bits) bzw. OP = 1 (M'-Bits) 

FC4A0C 3A83 

move.w 

D3,(A5) 

Busy und Skew versorgen 

FC4A0E 7A07 

moveq.1 

#7,05 

Bit 7 

FC4A10 0BD5 

bset 

D5,(A5) 

Blitter starten 

FC4A12 4E71 

nop 



FC4A14 66FA 

bne 

SFC4A10 

Blitter noch busy? 

FC4A16 548A 

addq.1 

#2,A2 

nächste Bildebene 

FC4A18 51CEFFE6 

dbra 

D6,$FC4A00 


FC4A1C 4E75 

rts 



*************************************************************** 


FC4A1E 342CFFDA 

move.w 

-38(A4),D2 

maximale Cursorspalte 

FC4A22 B440 

cmp.w 

00, D2 


FC4A24 6A02 

bpi 

SFC4A28 


FC4A26 3002 

move.w 

02,00 


FC4A28 342CFFDC 

move.w 

-36(A4),D2 

maximale Cursorzeile 

FC4A2C B441 

cmp.w 

01,02 


FC4A2E 6A02 

bpi 

SFC4A32 


FC4A30 3202 

move.w 

02,Dl 


FC4A32 3601 

move.w 

Dl ,D3 


FC4A34 C6ECFFDE 

mulu.w 

-34(A4),D3 

mal Bytes pro Zeile 

FC4A38 3400 

move.w 

DO,02 


FC4A3A 08820000 

bclr 

#0,02 


FC4A3E 56C4 

sne 

D4 
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FC4A40 C4EC0006 

mulu.w 

6(A4),D2 

mal Anzahl Bildebenen 

FC4A44 D804 

add.b 

04,D4 


FC4A46 D583 

addx.1 

03,D2 


FC4A48 22790000044E 

move.1 

S44E,A1 

_v_bs_ad 

FC4A4E D2ECFFE8 

add.w 

-24(A4),A1 

plus Offset vom Bildschirmanfang 

FC4A52 D3C2 

add.l 

02,AI 


FC4A54 4E75 

rts 



********************** 

***************************************** 

Cursor setzen 

FC4A56 526CFEAC 

addq.w 

#1,-340(A4) 


FC4A5A 08940001 

bclr 

#1,<A4) 


FC4A5E 6706 

beq 

SFC4A66 


FC4A60 226CFFE4 

move.1 

•28(A4),A1 

Adresse der Cursorposition 

FC4A64 6112 

bsr 

SFC4A78 

Zeichen invertieren 

FC4A66 61B6 

bsr 

SFC4A1E 


FC4A68 3940FFEA 

move.w 

D0,-22(A4) 

aktuelle Cursorspalte 

FC4A6C 3941FFEC 

move.w 

Dl,-20(A4) 

aktuelle Cursorzeile 

FC4A70 2949FFE4 

move.1 

Al,*28(A4) 

Adresse der Cursorposition 

FC4A74 6000FD7E 

bra 

SFC47F4 

Zeichen unter Cursor (Al) invertieren 




FC4A78 382C0008 

move.w 

8(A4),04 

Offset auf nächste Zeile 

FC4A7C 3A2CFFD8 

move.w 

-40(A4),D5 

Höhe eines Zeichen 

FC4A80 5345 

subq.w 

#1,05 

als dbra-Zähler 

FC4A82 3E2C0006 

move.w 

6(A4),D7 

Anzahl Bildebenen 

FC4A86 5347 

subq.w 

#1,07 

als dbra-Zähler 

FC4A88 2449 

move.1 

AI ,A2 

Cursoradresse merken 

FC4A8A 3C05 

move.w 

D5,D6 

Zeichenhöhe als dbra-Zähler 

FC4A8C 4612 

not.b 

(A2) 

eine Scanline invertieren 

FC4A8E D4C4 

add.w 

04, A2 

Zeiger auf nächste Scanline 

FC4A90 51CEFFFA 

dbra 

D6,$FC4A8C 

nächste Scanline 

FC4A94 5449 

addq.w 

#2, AI 

Offset auf nächste Bildebene 

FC4A96 51CFFFF0 

dbra 

D7,$FC4A88 

nächste Bildebene 

FC4A9A 4E75 

rts 



********************** 

***************************************** 

VDI ESC 102, Fontparameter initialisieren 

FC4A9C 206C000E 

move.1 

14(A4),A0 

Adresse INTIN-Array 

FC4AA0 2050 

move.1 

(A0),A0 

INTIN[0-13, Adresse des Fontheaders 

FC4AA2 49F900002994 

lea 

$2994,A4 

Adresse der LINE-A-Variablen 

FC4AA8 30280052 

move.w 

82(A0),D0 

formhight, Höhe eines Zeichens 

FC4AAC 3940FFD8 

move.w 

DO,-40(A4) 

merken 

FC4AB0 322C0008 

move.w 

8(A4),D1 

Anzahl Bytes pro Bildschirmzeile 

FC4AB4 C2C0 

mulu.w 

DO,Dl 

mal Höhe eines Zeichen 

FC4AB6 3941FFDE 

move.w 

D1,-34(A4) 

ergibt Bytes pro Characterzelle 

FC4ABA 7200 

moveq.1 

#0,D1 


FC4ABC 322C0002 

move.w 

2(A4),01 

Bildschirmhöhe in Pixel 

FC4AC0 82C0 

divu.w 

00,Dl 

durch Fonthöhe dividieren 

FC4AC2 5341 

subq.w 

#1 ,D1 

minus 1 

FC4AC4 3941FFDC 

move.w 

Dl,-36(A4) 

ergibt maximale Cursorzeile 

FC4AC8 7200 

moveq.1 

#0,01 


FC4ACA 322CFFFA 

move.w 

-6(A4),D1 

Bildschirmbreite in Pixel 

FC4ACE 82E80034 

divu.w 

52(A0),D1 

durch maximale Zeichenbreite 

FC4AD2 5341 

subq.w 

#1,01 

minus 1 

FC4AD4 3941FFDA 

move.w 

Dl,-38(A4) 

ergibt maximale Cursorspalte 

FC4AD8 39680050FFF8 

move.w 

80(A0),-8(A4) 

Breite des Fonts, formwidth 

FC4ADE 39680024FFF6 

move.w 

36(A0),-10(A4) 

kleinster ASCII-Code im Font 

FC4AE4 39680026FFF4 

move.w 

38(A0),-12(A4) 

größter ASCII-Code im Font 

FC4AEA 2968004CFFF0 

move.1 

76(A0),-16(A4) 

Zeiger auf Fontdaten 

FC4AF0 29680048FFFC 

move.1 

72CA0),-4(A4) 

Zeiger auf Offsetdaten 

FC4AF6 4E75 

rts 
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GEHDOS initialisieren 


FC4AF8 4E56FFFC 

link 

A6,#*4 


FC4AFC 23FC0000885A00008846 

move.1 

#$885j\,$8846 


FC4B06 23FC000088820000886E 

move.1 

#$8882,$886E 


FC4B10 33FCFFFF000088AA 

move.w 

#$FFFF,$884A 


FCAB18 33FCFFFF0000885E 

move.w 

#$FFFF,$885E 


FC4B20 33FCFFFF00008872 

move.w 

#$FFFF,$8872 


FCAB28 33FCFFFF00008886 

move.w 

#$FFFF,$8886 


FCAB30 23FC000075C400008856 

move.1 

#$75C4,$8856 


FCAB3A 23FC000077CA0000886A 

move.1 

#$77C4,$886A 


FCABAA 23FC000079CA0000887E 

move.1 

#$79C4,$887E 


FCABAE 23FC00007BC400008892 

move.1 

#$7BC4,$8892 


FCAB58 23FC000088A600000AB2 

move.1 

#$8846,$4B2 

_bufl 1 

FCAB62 23FC0000886E000004B6 

move.1 

#$886E,$4B6 

_bufl 2 

FCAB6C AEB900FCAEB8 

jsr 

SFC4EB8 

TRAP #1 und TRAP #2 Vektoren setzen 

FCAB72 3EB900000AA6 

move.w 

$446,<A7) 

bootdev 

FCAB78 4EB900FC601A 

jsr 

$FC6D1A 

als aktuelles Laufwerk 

FCAB7E AE5E 

unlk 

A6 


FCAB80 AE75 

rts 






**** Imul, 32 * 32 Bit-Multiplikation 

FCAB82 AE56FFFC 

link 

A6,#-4 


FCAB86 4242 

clr.w 

D2 


FC4B88 4AAE0008 

tst. 1 

8(A6) 

erster Faktor 

FC4B8C 6C06 

bge 

$FC4B94 

positiv? 

FC4B8E 44AE0008 

neg. 1 

8(A6) 

invertieren 

FC4B92 5242 

addq.w 

#1 ,D2 

Vorzeichen merken 

FC4B94 4AAE000C 

tst. 1 

12<A6) 

zweiter Faktor 

FC4B98 6C06 

bge 

SFC4BA0 

positiv? 

FC4B9A 44AE000C 

neg. 1 

12CA6) 

invertieren 

FC4B9E 5242 

addq.w 

#1 ,D2 

Vorzeichen merken 

FC4BA0 302E000A 

move.w 

10(A6),D0 

Lo-Wort erster Faktor 

FC4BA4 C0EE000E 

mulu.w 

14(A6),D0 

mal Lo-Wort zweiter Faktor 

FC4BA8 2D40FFFC 

move.1 

DO,*4(A6) 

Zwischenprodukt merken 

FC4BAC 302E0008 

move.w 

8(A6),D0 

Hi-Wort erster Faktor 

FC4BB0 C0EE000E 

mulu.w 

14(A6),D0 

mal Lo-Wort zweiter Faktor 

FC4BB4 322E000C 

move.w 

12(A6),D1 

Hi-Wort zweiter Faktor 

FC4BB8 C2EE000A 

mulu.w 

10(A6),D1 

mal Lo-Wort erster Faktor 

FC4BBC D041 

add.w 

Dl,DO 

Produkte addieren 

FC4BBE D06EFFFC 

add.w 

*4(A6),D0 

plus erstes Zwischenprodukt 

FC4BC2 3D40FFFC 

move.w 

DO,-4(A6) 


FC4BC6 202EFFFC 

move.1 

-4(A6),D0 

Ergebnis 

FC4BCA 08020000 

btst 

#0,02 

Vorzeichen negativ? 

FC4BCE 6702 

beq 

$FC4BD2 

nein 

FC4BD0 4480 

neg.l 

DO 

sonst Ergebnis invertieren 

FC4BD2 4E5E 

unlk 

A6 


FC4BD4 4E75 

rts 






**** schnelle Lösch-Routine 

FC4BD6 206F0004 

move.1 

4<A7),A0 

Anfangsadresse 

FC4BDA 226F0008 

move.1 

8(A7),AI 

Endadresse 

FC4BDE 48E71F10 

movem. 1 

D3-D7/A3,•(A7) 

Register retten 

FC4BE2 7200 

moveq.1 

#0,D1 


FC4BE4 7400 

moveq.1 

#0,D2 


FC4BE6 7600 

moveq.1 

#0,D3 


FC4BE8 7800 

moveq.1 

#0,D4 


FC4BEA 7A00 

moveq.1 

#0,D5 

7 Daten-Register löschen 

FC4BEC 7C00 

moveq.1 

#0,06 


FC4BEE 7E00 

moveq.1 

#0,D7 


FC4BF0 3647 

move.w 

D7,A3 

und A3 löschen 

FC4BF2 2008 

move.1 

A0,D0 

Anfangsadresse 
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FC4BF4 08000000 

btst 

#O,D0 

ungerade? 

FC4BF8 6702 

beq 

$FC4BFC 

nein 

FC4BFA 10C1 

move.b 

Dl,(A0)+ 

ein Byte löschen, jetzt gerade 

FC4BFC 2009 

move. 1 

AI,DO 

Endadresse 

FC4BFE 9088 

sub. 1 

A0,D0 

minus Startadresse gleich Länge 

FC4C00 COBCFFFFFFOO 

and. 1 

#$FFFFFF00,D0 

ganze Pages 

FC4C06 672C 

beq 

SFC4C34 

weniger als eine Page 

FC4C08 41F00800 

lea 

(A0,D0.l),A0 

Ende des Bereichs aus ganzen Pages 

FC4C0C 2448 

move.l 

A0,A2 

Adresse merken 

FC4C0E E088 

Isr.l 

#8, DO 

Anzahl durch 256 

FC4C10 48E27F10 

movem.1 

Dl-D7/A3,-(A2) 


FC4C14 48E27F10 

movem.1 

Dl-D7/A3,-(A2) 


FC4C18 48E27F10 

movem.1 

Dl-D7/A3,•(A2) 


FC4C1C 48E27F10 

movem. 1 

Dl-D7/A3,-(A2) 


FC4C20 48E27F10 

movem.1 

Dl-D7/A3,-(A2) 

256 Bytes löschen 

FC4C24 48E27F10 

movem.1 

Dl-D7/A3,-(A2) 


FC4C28 48E27F10 

movem.1 

Dl-D7/A3,-(A2) 


FC4C2C 48E27F10 

movem.1 

Dl-D7/A3,•(A2) 


FC4C30 5380 

subq.1 

#1 ,D0 

Zähler dekrementieren 

FC4C32 66DC 

bne 

SFC4C10 

noch eine Page? 

FC4C34 B3C8 

cmp. 1 

A0, Al 

Endadresse schon erreicht? 

FC4C36 6704 

beq 

SFC4C3C 

ja, fertig 

FC4C38 10C1 

move.b 

Dl,(A0)+ 

restliche Bytes löschen 

FC4C3A 60F8 

bra 

SFC4C34 

nächstes Byte 

FC4C3C 4CDF08F8 

movem.1 

(A7)+,D3-D7/A3 

Register zurückholen 

FC4C40 4E75 

rts 



*************************************************************** 

Systemzeit aus Hardware-Uhr übernehmen 

FC4C42 6122 

bsr 

SFC4C66 

Hardware-Uhr vorhanden? 

FC4C44 65IC 

bcs 

SFC4C62 

nein 

FC4C46 6156 

bsr 

SFC4C9E 

Zeit aus Hardware-Uhr lesen 

FC4C48 BOBCFFFFFFFF 

cmp. 1 

#$FFFFFFFF,D0 

Wert ungültig? 

FC4C4E 6712 

beq 

SFC4C62 

ja, nicht benutzen 

FC4C50 33C0000075B0 

move.w 

D0.S75B0 

Lo-Word als GEMDOS Uhrzeit 

FC4C56 4840 

swap 

DO 


FC4C58 33C000008840 

move.w 

DO,$8840 

Hi-Word als GEMDOS Datum 

FC4C5E 7000 

moveq.1 

#0,D0 

ok 

FC4C60 4E75 

rts 



FC4C62 70FF 

moveq.1 

#- 1,D0 

Fehler 

FC4C64 4E75 

rts 


Test auf Hardware-Uhr 




FC4C66 307CFC20 

move.w 

#$FC20,A0 

Adresse der Hardware-Uhr 

FC4C6A 117C0009001B 

move.b 

#9,27(A0) 


FC4C70 303C0A05 

move.w 

#SA05,D0 


FC4C74 01880005 

movep.w 

D0,5(A0) 

Wert in Uhrenregister schreiben 

FC4C78 03080005 

movep.w 

5(A0),D1 

und zurücklesen 

FC4C7C C27C0F0F 

and.w 

#$F0F,D1 

Hi-Nibbles löschen 

FC4C80 B240 

cmp.w 

DO,Dl 

richtig zurückgelesen? 

FC4C82 6614 

bne 

SFC4C98 

nein, Uhr nicht vorhanden 

FC4C84 117C00010001 

move.b 

#1,1(A0) 


FC4C8A 117C0008001B 

move.b 

#8,27<A0) 


FC4C90 117C0000001D 

move.b 

#0,29(A0) 


FC4C96 4E75 

rts 



FC4C98 003C0001 

or.b 

#1, SR 

Carry setzen, Uhr nicht vorhanden 

FC4C9C 4E75 

rts 






Hardware-Uhr lesen 

FC4C9E 61C6 

bsr 

SFC4C66 

ist Hardware-Uhr vorhanden? 

FC4CA0'650000B6 

bcs 

SFC4D58 

nein 

FC4CA4 43F900000E94 

lea 

$E94,A1 

Zeiger auf ersten Zwischenspeicher 

FC4CAA 45F900000EA1 

lea 

$EA1,A2 

Zeiger auf zweiten Zwischenspeicher 
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FC4CB0 

6100008E 

bsr 

SFC4D40 

13 Uhren-Register nach (Al) lesen 

FC4CB4 

C34A 

exg 

A1.A2 

Adressen vertauschen 

FC4CB6 

61000088 

bsr 

SFC4D40 

13 Uhren-Register nach (Al) lesen 

FC4CBA 

700C 

moveq.1 

#12,00 

Zähler auf 13 

FC4CBC 

12310000 

move.b 

(AI,00.w),Dl 

Werte vom zweiten Lesen 

FC4CC0 

B2320000 

cmp.b 

(A2,D0.w),D1 

mit denen vom ersten Mal vergleichen 

FC4CC4 

66EE 

bne 

SFC4CB4 

ungleich, dann nochmal lesen 

FC4CC6 

51C8FFF4 

dbra 

D0,SFC4CBC 

nächsten Wert vergleichen 

FC4CCA 

7000 

moveq.1 

#0,00 

Sekundenwert löschen 

FC4CCC 

1029000B 

move.b 

11(AI),00 

Sekunden-Zehner holen 

FC4CD0 

C0FC000A 

mulu.w 

#$A,D0 

mal 10 

FC4CD4 

D029000C 

add.b 

12(Al>,00 

plus Sekunden-Einer 

FC4CD8 

E240 

asr.w 

#1,00 

durch 2 teilen 

FC4CDA 

3200 

move.w 

00,01 

Ergebnis merken 

FC4CDC 

7000 

moveq.1 

#0,D0 

Minutenwert löschen 

FC4CDE 

10290009 

move.b 

9<A1),D0 

Minuten-Zehner holen 

FC4CE2 

C0FC000A 

mulu.w 

#SA,D0 

mal 10 

FC4CE6 

D029000A 

add.b 

10(A1),D0 

plus Minuten-Einer 

FC4CEA 

EB40 

asl .w 

#5, DO 

an richtige Stelle schieben 

FC4CEC 

0240 

add.w 

00,01 

zu Sekunden addieren 

FC4CEE 

7000 

moveq.1 

#0,D0 

Stundenwert löschen 

FC4CF0 

10290007 

move.b 

7(A1),D0 

Stunden-Zehner holen 

FC4CF4 

C0FC000A 

mulu.w 

#$A,D0 

mal 10 

FC4CF8 

D0290008 

add.b 

8(A1),D0 

plus Stunden-Einer 

FC4CFC 

E140 

asl .w 

#8,00 

an richtige Stelle schieben 

FC4CFE 

E740 

asl .w 

#3,DO 


FC4D00 

0240 

add.w 

00,01 

zu bisherigem Wert addieren 

FC4D02 

4841 

swap 

Dl 

Wert in obere Registerhälfte 

FC4D04 

7000 

moveq.1 

#0,00 

Tagwert löschen 

FC4D06 

10290004 

move.b 

4(A1),D0 

Tag-Zehner holen 

FC4D0A 

C0FC000A 

mulu.w 

#$A,D0 

mal 10 

FC4D0E 

00290005 

add.b 

5(A1),00 

plus Tag-Einer 

FC4D12 

3200 

move.w 

00,Dl 

Ergebnis merken 

FC4D14 

7000 

moveq.1 

#0,00 

Monatswert löschen 

FC4D16 

10290002 

move.b 

2(A1),00 

Monat-Zehner holen 

FC4D1A 

C0FC000A 

mulu.w 

#$A,D0 

mal 10 

FC4D1E 

D0290003 

add.b 

3(A1),D0 

plus Monat-Einer 

FC4D22 

EB40 

asl .w 

#5,00 

an richtige Position schieben 

FC4D24 

D240 

add.w 

00,01 

zu Tagwert addieren 

FC4D26 

7000 

moveq.1 

#0,D0 

Jahrwert löschen 

FC4D28 

10290000 

move.b 

(AI),00 

Jahr-Zehner holen 

FC4D2C 

COFCOOOA 

mulu.w 

#$A,D0 

mal 10 

FC4D30 

D0290001 

add.b 

1(A1),00 

plus Jahr-Einer 

FC4D34 

E140 

asl.w 

#8,00 

an richtige Position schieben 

FC4D36 

E340 

asl.w 

#1 ,D0 


FC4D38 

D240 

add.w 

00,Dl 

zu bisherigem Ergebnis addieren 

FC4D3A 

4841 

swap 

01 

Datum und Zeit wieder vertauschen 

FC403C 

2001 

move.1 

01,00 

als Ergebnis 

FC4D3E 

4E75 

rts 








FC4D40 

700C 

moveq.1 

#12,00 

Zähler auf 13 

FC4042 

7201 

moveq.1 

#1,01 

Start bei erster ungerader Adresse 

FC4D44 

14301000 

move.b 

(A0,D1.w),D2 

Uhren-Register lesen 

FC4D48 

C43C000F 

and.b 

#$F,D2 

Hi-Nibble löschen 

FC4D4C 

13820000 

move.b 

D2,(Al,D0.w) 

und in Zielbereich schreiben 

FC4D50 5441 

addq.w 

#2,01 

Zeiger auf nächstes Uhren-Register 

FC4D52 51C8FFF0 

dbra 

D0,$FC4D44 

nächstes Register lesen 

FC4D56 4E75 

rts 
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FC4D58 70FF 

FC4D5A 4E75 

moveq.l 

rts 

#-1,D0 

Fehler, Uhr nicht vorhanden 

FC4D5C 6100FF08 

bsr 

SFC4C66 

Uhr vorhanden? 

FC4D60 65000002 

bcs 

SFC4E34 

nein 

FC4D64 43F900000E94 

lea 

SE94.A1 

Zeiger auf Zwischenpuffer 

FC4D6A 322F0006 

move.w 

6<A7),D1 

Time 

FC4D6E 3001 

move.w 

Dl,DO 


FC4D70 C0BC0000001F 

and. 1 

#$1F,D0 

Sekunden isolieren 

FC4D76 D040 

add.w 

DO,DO 

mal 2 

FC4D78 80FC000A 

divu.w 

#SA,D0 

durch 10 teilen 

FC4D7C 1340000B 

move.b 

DO,11(A1) 

Sekunden-Zehner 

FC4D80 4840 

swap 

DO 


FC4D82 1340000C 

move.b 

DO,12(A1) 

Sekunden-Einer 

FC4086 3001 

move.w 

Dl,DO 


FC4D88 EA48 

Isr.w 

#5,DO 

Minuten 

FC4D8A C0BC0000003F 

and. 1 

#$3F,D0 

isolieren 

FC4D90 80FC000A 

divu.w 

«A,D0 

durch 10 teilen 

FC4D94 13400009 

move.b 

D0,9(A1) 

Minuten-Zehner 

FC4D98 4840 

swap 

DO 


FC4D9A 1340000A 

move.b 

DO,10(AI) 

Mi nuten-Einer 

FC409E E049 

Isr.w 

#8,Dl 


FC4DA0 E649 

Isr.w 

#3,Dl 

Stunden isolieren 

FC4DA2 48C1 

ext.l 

01 


FC4DA4 82FC000A 

divu.w 

#*A,D1 

durch 10 teilen 

FC4DA8 13410007 

move.b 

Dl,7(A1) 

Stunden-Zehner 

FC4DAC 4841 

swap 

Dl 


FC4DAE 13410008 

move.b 

01, 8<AI) 

Stunden-Einer 

FC4DB2 322F0004 

move.w 

4(A7),D1 

Datum holen 

FC4DB6 3001 

move.w 

Dl,DO 


FC4DB8 C0BC0000001F 

and. 1 

#S1F,D0 

Tag isolieren 

FC40BE 80FC000A 

divu.w 

#SA,D0 

durch 10 teilen 

FC4DC2 13400004 

move.b 

D0,4(A1) 

Tag-Zehner 

FC4DC6 4840 

swap 

DO 


FC4DC8 13400005 

move.b 

D0,5(A1) 

Tag-Einer 

FC4DCC 3001 

move.w 

Dl,DO 


FC4DCE EA48 

Isr.w 

#5, DO 

Monat isolieren 

FC4DD0 C08C0000000F 

and. 1 

#$F,D0 


FC4DD6 80FC000A 

divu.w 

#SA,D0 

durch 10 teilen 

FC4D0A 13400002 

move.b 

D0,2(A1) 

Monat-Zehner 

FC4DDE 4840 

swap 

DO 


FC4DE0 13400003 

move.b 

D0,3(A1) 

Monat-Einer 

FC4DE4 E249 

Isr.w 

#1 ,D1 


FC40E6 E049 

Isr.w 

#8,01 

Jahr isolieren 

FC40E8 48C1 

ext.l 

01 


FC4DEA 2401 

move.l 

Dl ,D2 


FC4DEC 82FC000A 

divu.w 

#SA,D1 

durch 10 teilen 

FC4DF0 13410000 

move.b 

Dl,(AI) 

Jahr-Zehner 

FC4DF4 4841 

swap 

Dl 


FC4DF6 13410001 

move.b 

Dl,1(A1) 

Jahr-Einer 

FC40FA 84FC0004 

divu.w 

#4,D2 

Jahr durch 4 teilen 

FC40FE 4842 

swap 

02 

Rest holen 

FC4E00 42290006 

clr.b 

6(A1) 

Wochentag löschen 

FC4E04 117C0002001F 

move.b 

#2,31(A0) 


FC4E0A 117C0009001B 

move.b 

#9,27<A0) 


FC4E10 117C00010015 

move.b 

#1,21(A0) 


FC4E16 11420017 

move.b 

D2,23(A0) 

Schaltjahr setzen 

FC4E1A 117C0008001B 

move.b 

#8,27(A0) 






Das BIOS-Listing 


477 


FC4E20 700C 

moveq.l 

#12,00 

13 Register 

FC4E22 7201 

moveq.1 

#1,01 


FC4E24 11B100001000 

move.b 

(Al,D0.w),(A0,D1.w) 

Puffer in Hardware-Uhr kopieren 

FC4E2A 5441 

addq.w 

#2,01 

nächstes Uhr-Register 

FC4E2C 51C8FFF6 

dbra 

D0.SFC4E24 

nächstes Byte 

FC4E30 7000 

moveq.1 

#0,00 

ok 

FC4E32 4E75 

rts 



FC4E34 70FF 

moveq.1 

#•1,00 

Fehler 

FC4E36 4E75 

rts 



*************************************************************** 

Blitter-Routinen umschalten 

FC4E38 33C000002A44 

move.w 

D0.S2A44 

Blit-Mode merken 

FC4E3E 207900002A40 

move.1 

S2A40.A0 

Adresse der Routinen ohne Blitter 

FC4E44 08000000 

btst 

#0,D0 

Grafik-Rout inen ohne Blitter? 

FC4E48 6706 

beq 

SFC4E50 

ja 

FC4E4A 207900002A3C 

move.1 

$2A3C,A0 

Adresse der Routinen mit Blitter 

FC4E50 43F900002A14 

lea 

$2A14,A1 

Zieladresse 

FC4E56 7009 

moveq.1 

#9,00 

10 Vektoren 

FC4E58 22D8 

move.1 

(A0)+,(Al)+ 

kopieren 

FC4E5A 51C8FFFC 

dbra 

D0,$FC4E58 

nächster Vektor 

FC4E5E 4E75 

rts 



*************************************************************** 

Blitmode holen 

FC4E60 303900002A44 

move.w 

S2A44.D0 

Blitmode 

FC4E66 4E75 

rts 



*************************************************************** 

Grafikroutinen für Blitter-Betrieb 

FC4E68 00FC4818 

dc.l 

SFC4818 


FC4E6C 00FC48AC 

de. 1 

SFC48AC 


FC4E70 00FC4910 

dc.l 

$FC4910 


FC4E74 00FC4990 

dc.l 

$FC4990 


FC4E78 00FD06CE 

dc.l 

SFD06CE 


FC4E7C 00FCFA18 

dc.l 

$FCFA18 


FC4E80 00FCFD26 

dc.l 

SFCFD26 


FC4E84 00FCA264 

dc.l 

SFCA264 


FC4E88 00FCA624 

dc.l 

SFCA624 


FC4E8C 00FCEEC0 

de. 1 

JFCEEC0 


*************************************************************** 

Grafikroutinen ohne Blitter 

FC4E90 00FD1476 

dc.l 

SF01476 


FC4E94 00FD14F4 

dc.l 

SFD14F4 


FC4E98 00FD1538 

dc.l 

SFD1538 


FC4E9C 00FD159C 

dc.l 

SFD159C 


FC4EA0 00FD1092 

dc.l 

SF01092 


FC4EA4 00FD1D1E 

dc.l 

SFD1D1E 


FC4EA8 00FD1B70 

de. 1 

SFD1B70 


FC4EAC 00FD1A36 

de. 1 

SFD1A36 


FC4EB0 00FD1B3A 

dc.l 

SFD1B3A 


FC4EB4 00FD1E50 

dc.l 

SFD1E50 





Bildschirm löschen 

FCA6AE 2F390000044E 

move.1 

S44E,•(A7) 

BiIdschirmadresse 

FCA6B4 069700007D00 

add. 1 

#32000,(A7) 

plus 32000 gleich Endadresse 

FCA6BA 2F390000044E 

move.1 

S44E,•(A7) 

Startadresse 

FCA6C0 4EB900FC4BD6 

jsr 

SFC4B06 

schnelle Löschroutine 

FCA6C6 508F 

addq.l 

#8,A7 

Stackpointer korrigieren 

FCA6C8 4E75 

rts 


BiIdschirmausgabe initialisieren 




FCA96E 10390000044C 

move.b 

S44C.D0 

sshiftmd, Bildschirmauflösung 

FCA974 7203 

moveq.1 

#3,Dl 

Maske für Bit 0 und 1 

FCA976 C041 

and.w 

01,00 

nicht relevante Bits maskieren 

FCA978 B041 

emp.w 

01,00 

3? 

FCA97A 6602 

bne 

SFCA97E 

nein 

FCA97C 7002 

moveq.1 

#2,00 

durch 2, high resolution ersetzen 
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FCA97E 3F00 

move.w 

DO,-(A7) 

Auflösung merken 

FCA980 61000090 

bsr 

SFCAA12 

Parameter für Bildschirmauflösung setzen 

FCA984 41F900FD412C 

lea 

SFD412C,A0 

Adresse des 8*8 System Font Headers 

FCA98A 301F 

move.w 

<A7)*,D0 

Auflösung zurückholen 

FCA98C B07C0002 

cmp.w 

#2, DO 

high resolution? 

FCA990 6606 

bne 

SFCA998 

nein 

FCA992 41F900FD5B88 

lea 

SFD5B88,A0 

Adresse des 8*16 System Font Headers 

FCA998 6100A108 

bsr 

SFC4AA2 

Fontdaten initialisieren 

FCA99C 4240 

clr.w 

DO 


FCA99E 33C000002974 

move.w 

DO,$2974 

Hintergrundfarbe auf weiß 

FCA9A4 33C00000297E 

move.w 

D0,$297E 

Cursorspalte Null 

FCA9AA 33C000002980 

move.w 

DO,$2980 

Cursorzeile Null 

FCA9B0 33C00000297C 

move.w 

D0,$297C 

Zeilenoffset Null 

FCA9B6 13C000002995 

move.b 

DO,$2995 

Cursorflag rücksetzen 

FCA9BC 4640 

not .w 

DO 


FCA9BE 33C000002976 

move.w 

DO,$2976 

Vordergrundfarbe auf schwarz 

FCA9C4 23F90000044E00002978 

move.1 

$44E,$2978 

_v_bs_ad, Bildschirmadresse für Cursor 

FCA9CE 7001 

moveq.1 

#1 ,D0 


FCA9D0 13C000002994 

move.b 

DO,$2994 

Cursorflag setzen 

FCA906 33C000002840 

move.w 

DO,$2840 

Cursor nicht sichtbar 

FCA90C 701E 

moveq.1 

#30,DO 


FCA9DE 13C000002983 

move.b 

DO,$2983 

Cursor Blinkzähler auf 30 

FCA9E4 13C000002982 

move.b 

DO,$2982 

Cursor Blinkrate auf 30 

FCA9EA 23FC00FC4362000004A8 

move.1 

#$FC4362,$4A8 

con_state Vektor auf Standard 

FCA9F4 6000FCB8 

bra 

SFCA6AE 

Bildschirm löschen 




* Blitter-Vektoren initialisieren 

FCA9F8 23FC00FC4E9000002A40 

move.1 

#$FC4E90,$2A40 

Routinen ohne Blitter 

FCAA02 23FC00FC4E6800002A3C 

move.1 

#$FC4E68,$2A3C 

Routinen mit Blitter 

FCAAOC 4EF900FC4E38 

jmp 

$FC4E38 

Vektoren für Blitter setzen 




* Parameter für Bildschirmauflösung setzen 

FCAA12 E748 

Isl .w 

#3,DO 

Auflösung mal 8 

FCAA14 41FB0022 

lea 

$FCAA38(PC,D0.w),A0 

Adresse in Tabelle 

FCAA18 33D80000299A 

move.w 

<A0)*,$299A 

Anzahl Bildebenen 

FCAA1E 33000000299C 

move.w 

(A0),$299C 

Anzahl Bytes pro Zeile 

FCAA24 330800002998 

move.w 

(A0)*,$2998 

Anzahl Bytes pro Zeile 

FCAA2A 330800002996 

move.w 

(A0)*,$2996 

Bildschirmhöhe in Pixel 

FCAA30 33D00000298E 

move.w 

(A0),$298E 

Bildschirmbreite in Pixel 

FCAA36 4E75 

rts 






* Bildschirmparameter 

FCAA38 0004 

dc.w 

4 

Anzahl Bildebenen, lores 

FCAA3A 00A0 

dc.w 

160 

Bytes pro Bildschirmzeile 

FCAA3C 00C8 

dc.w 

200 

Bildschirmhöhe in Pixel 

FCAA3E 0140 

dc.w 

320 

Bildschirmbreite in Pixel 

FCAA40 0002 

dc.w 

2 

Anzahl Bildebenen, midres 

FCAA42 00A0 

dc.w 

160 

Bytes pro Bildschirmzeile 

FCAA44 00C8 

dc.w 

200 

Bildschirmhöhe in Pixel 

FCAA46 0280 

dc.w 

640 

Bildschirmbreite in Pixel 

FCAA48 0001 

dc.w 

1 

Anzahl Bildebenen, hi res 

FCAA4A 0050 

dc.w 

80 

Bytes pro Bildschirmzeile 

FCAA4C 0190 

dc.w 

400 

Bildschirmhöhe in Pixel 

FCAA4E 0280 

dc.w 

640 

Bildschirmbreite in Pixel 
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7. Programme zum Mega ST 


7.1 Anpassung von GfA-BASIC 2.0 an den Mega ST 

Bei der Diskussion über die Kompatibilität des Mega ST zu 
seinen 'Vorfahren’ tritt wohl am häufigsten die Frage auf, ob 
dieses oder jenes Programm vollständig auf dem Mega läuft. 
Eines der wichtigeren Programme, für die dies sehr interessant 
ist, ist der beliebte GfA-BASIC-Interpreter, der tatsächlich auch 
auf dem Mega ST seine Programme interpretiert und abarbeitet. 

Dennoch ist ein nicht unerheblicher Punkt aufgetreten, an dem 
der Interpreter auf dem Mega versagt. Gemeint ist dabei die 
Möglichkeit, den Programmablauf jederzeit durch die gleich¬ 
zeitige Betätigung der Control-, Shift- und Alternate-Taste zu 
stoppen. Dies funktioniert nicht bei allen, auf dem Markt be¬ 
findlichen GFA-V2.0-Versionen.. 

Der Grund für diese Weigerung, auf die Tastenkombination zu 
reagieren, liegt im veränderten Aufbau des Variablenspeichers 
der neuen TOS-Version. Aus Gründen der Zeitersparnis hat 
nämlich der Autor des BASIC-Interpreters nicht den dokumen¬ 
tierten Weg über das XBIOS gewählt, um den Tastenstatus zu 
erfahren. Wesentlich schneller geht es ja, diese Information 
direkt aus dem Speicher zu lesen. 

Bei der alten TOS-Version lag der Wert der Sondertasten im 
Speicherbyte an der Adresse $E1B. Diese Adresse hat sich in der 
neuen Version auf $E61 verschoben. 

Dies ist jedoch kein Grund, sich mit dem wesentlich ver¬ 
ringerten Komfort des GFA-Interpreters abzufinden. In diesem 
Programm wird nämlich dreimal der Inhalt dieser Speicherzelle 
ausgelesen und bearbeitet. Diese drei Stellen liegen in der Ver¬ 
sion 2.0 des Interpreters fest, so daß wir die dort liegenden 
Adressen ändern können. 



480 


Das große Mega-ST-Buch 


Im folgenden stelle ich Ihnen ein kleines Programm vor, das dies 
bewerkstelligt. Testen Sie zunächst, ob Ihre GFA-BASIC-Ver- 
sion sich nicht abbrechen läßt. Dann können Sie ihren Inter¬ 
preter patchen. Dazu sollten Sie sich den Interpreter 
(GFABASIC.PRG) auf eine Extradiskette kopieren, ihn starten 
und das folgende Programm eingeben bzw. laden und starten: 

Cls 

Print "***** GFA-BAS IC-Patchrout ine für Mega-ST ******* 

Print 

Print Patch-Vorgang beginnt.. 

Open "u" f #1/'aigfabasic.prg“ 
a)Replace(&H62AA) 

3Replace(&H62B2) 

S)Replace(&H63AC) 

CIose #1 

Print Fertig! Alles OK! 

i 

Procedure Replace(Adr%) 

Seek #1,Adr% 

If Inp(#1)*256+Inp(#1)=&HE1B 
Seek #1,Adr%+1 
Out #1,&H61 
Else 

Alert 1," Da stimmt was nicht ! |"; 

" Falsche GFA-Version ! ",1," Stop ",D% 

Close #1 
End 
Endif 
Return 

Das Programm öffnet die Datei ’GFABASIC.PRG’ und ruft drei 
mal die Prozedur ’Replace()’ mit verschiedene Werten auf. Diese 
Werte entsprechen der Adresse der drei Zugriffe innerhalb des 
Interpreters, gerechnet vom Programmbeginn. 

Die Prozedur stellt nun den Datenzeiger innerhalb der Datei auf 
den übergebenen Wert ein und vergleicht dann den Inhalt dieser 
Adresse mit dem Wert $E1B, welcher ja der alten Adresse des 
Sondertastenstatus entspricht. Stimmt dies nicht überein, so han¬ 
delt es sich bei dem Programm entweder um eine ältere oder 
eine bereits angepaßte BASIC-Version. Es wird dann ein Alarm- 
Fenster ausgegeben und das Programm gestoppt. Sie sollten in 
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diesem Fall das eventuell bereits veränderte Interpreter-Pro¬ 
gramm wieder von der Diskette löschen. 

Liegt an der gesuchten Adresse wirklich der Wert $E1B, so wird 
das $1E-Byte in $61 umgewandelt und die Prozedur beendet. 
Nachdem die drei Durchläufe der Prozedur korrekt abgelaufen 
sind, läuft das GFABASIC.PRG auf dieser Diskette nun auf dem 
Mega ST. Beachten Sie bitte: Es läuft dann nicht mehr korrekt 
mit der alten TOS-Version zusammen! Es ist daher zweckmäßg, 
die alte Version aufzubewahren und ggf. den Namen einer der 
beiden Versionen zu ändern (z.B. MEGAGFA.PRG). Mit dieser 
neuen Version können Sie nun die weiteren Programme in 
diesem Buch ausprobieren. 


7.2 Diskettenlaufwerke 

In den Zeiten der ersten Home-Computer wie dem PET oder 
den späteren Atari XL oder C64 war es üblich, zur Speicherung 
seiner Programme einen Kassettenrecorder neben dem Rechner 
stehen zu haben. Auf handelsüblichen Tonkassetten konnte man 
dort Programme oder Daten abspeichern. Das große Problem da¬ 
bei war allerdings, daß man nicht nur lange nach dem ge¬ 
wünschten Programm auf einem Band suchen mußte, sondern 
beim Laden so manche Tasse Kaffee trinken konnte. 

Dann kam eine neue Generation von Massenspeichern auf den 
Markt: die sogenannten Floppy-Disks. Diese lösten die Kassetten 
schnell ab, da man auf einer Diskette mehrere Programme ab- 
legen, jederzeit wiederfinden und vor allem schnell laden 
konnte. Floppy heißt auf deutsch soviel wie schlaff, beweglich, 
so daß eine Floppy-Disk eine schlaffe, bewegliche Scheibe sein 
soll. Dies kann man allerdings nur bestätigen, wenn man einmal 
eine 8 oder auch 5?-ZolI-Diskette in der Hand hatte... 

Der Mega ST besitzt ein eingebautes 3i-Zoll-Diskettenlaufwerk. 
Die in dem Plastik-Gehäuse untergebrachte Scheibe hat also nur 
einen Durchmesser von etwa 8,75 cm, auf die dennoch etwa 1 
Million Zeichen passen. Dies ist gegenüber den älteren Daten¬ 
trägern eine enorme Packungsdichte! 
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Das physikalische Prinzip der Datenspeicherung ist auf Disketten 
das gleiche wie bei Tonband-Kassetten. Das Material, aus dem 
diese Bänder und auch die Disketten gefertigt sind, ist magneti¬ 
sierbar. Der Tonkopf im Kassettenrecorder oder auch das 
Äquivalent im Diskettenlaufwerk ist eigentlich nichts anderes als 
ein kleiner Elektromagnet, der dieses Material verschieden 
magnetisiert und dadurch Informationen darauf unterbringt. 

Die Scheibe der Diskette rotiert im Laufwerk mit ca. 300 Um¬ 
drehungen pro Minute, wenn auf sie zugegriffen wird (Lauf¬ 
werkslampe an). Dabei schleifen zwei Schreib-/Leseköpfe über 
ihre Oberfläche, einer auf jeder Seite. Werden diese Köpfe nicht 
bewegt, so überstreichen sie also einen Kreis, der Spur oder 
Track genannt wird. Jeder dieser Tracks ist im Normalfall in 9 
Sektoren unterteilt, von denen jeder 512 Bytes beinhaltet. Somit 
hat man, auch ohne die Köpfe zu bewegen, einen Zugriff auf 
2*9*512=9216 Bytes innerhalb 1/300 Sekunden! 

Die Einteilung der Diskette in Tracks und Sektoren ist allerdings 
nicht auf der Scheibe festgelegt. Um diese Unterteilung herzu¬ 
stellen, muß eine neue Diskette vor der Verwendung als Daten¬ 
träger erst einmal formatiert werden. Bei dieser Formatierung 
werden Markierungen auf der Diskette angebracht, die die Sek¬ 
toren und Tracks kennzeichnen. Dabei werden pro Seite 80 
Tracks mit je 9 Sektoren markiert. Außerdem wird im ersten 
Sektor der Diskette, der im äußersten Track liegt, ein soge¬ 
nannter Boot-Sektor erstellt. 

Dieser Sektor spielt eine ganz besondere Rolle. Wenn Sie eine 
Diskette in das Laufwerk einlegen und den ST einschalten, so 
wird zuallererst dieser Sektor eingelesen. Der Rechner weiß 
dann, wie viele Seiten, Tracks und Sektoren er auf dieser Dis¬ 
kette verwenden kann, da diese Informationen beim Formatieren 
in den Sektor eingetragen worden sind. 

Um nun die Dateien auf einer solchen Diskette planvoll unter¬ 
bringen und auch wiederfinden zu können, verfügt jede Diskette 
über ein Inhaltsverzeichnis. In diesem Directory sind sowohl die 
Dateinamen als auch weitere Informationen über diese Dateien 
enthalten. So wird das Datum und die Uhrzeit der Datei-Erstel- 
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lung, die Länge und der Typ der Datei im Directory eingetra¬ 
gen. Diese Informationen finden Sie auch im Desktop, wenn Sie 
das Diskettensymbol anklicken und im Menü den Darstellungs¬ 
typ "als Text" anwählen. 

Zusätzlich zu den normalen Dateien, wozu Programme ebenso 
zählen wie Texte oder Programmtexte (.BAS), gibt es noch 
weitere Eintragstypen im Directory. Einer dieser Typen ist der 
Ordner, der im Desktop-Fenster durch ein vorgestelltes Symbol 
gekennzeichnet ist. In einem solchen Ordner ist ein weiteres In¬ 
haltsverzeichnis enthalten, in dem wieder Ordner liegen können 
usw. 

Ein solcher Ordner ist auf den ersten Blick eine Datei wie jede 
andere auch. Diese Datei enthält allerdings kein Programm oder 
Text, sondern ein Inhaltsverzeichnis, das ebenso aufgebaut ist 
wie das oberste Directory, auch Root-Directory genannt. Aus 
diesem Grund kann man die Ordner eigentlich beliebig tief 
schachteln, also Ordner im Ordner im Ordner usw. ablegen. 
Warum dieses beliebig beim ST nicht ganz wörtlich zu nehmen 
ist, erfahren Sie im Kapitel über die Festplatte. 

Doch nun zurück zum grundsätzlichen Aufbau einer Diskette. 
Die Kapazität von 720 KByte, die eine Diskette nach doppel¬ 
seitigem Formatieren hat, ergibt sich aus der Anzahl der Seiten 
mal Tracks mal Sektoren pro Tracks. Wie bereits erwähnt, ver¬ 
wendet die Formatierfunktion des Desktop das Format 80 Tracks 
mit je 9 Sektoren pro Seite. Dadurch erreicht eine Diskette die 
Kapazität 2*80*9*512=737280 Bytes, die allerdings nicht alle für 
Ihre Daten verfügbar sind. Schließlich braucht auch der Boot- 
Sektor und das Inhaltsverzeichnis etwas Platz! 

Wenn man nun eine Diskette so formatiert, daß auf einem Track 
10 Sektoren liegen, erhält man einen Kapazitätszuwachs von 
2*80*512=81920 Bytes. Verwendet man nun auch noch einen 
oder zwei Tracks mehr auf der Diskette, so kann man die Ge¬ 
samtkapazität einer Diskette leicht auf über 800 KByte anheben! 
Allerdings lassen sich solche Disketten nicht mehr komplett mit 
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dem Desktop kopieren, da das Format nicht mehr mit anderen 
Disketten übereinstimmt. Einzelne Dateien bzw. Ordner lassen 
sich aber ohne weiteres darauf unterbringen. 

Wie ist so ein Format zu erreichen? Nun, das Desktop muß da 
passen. Wir müssen also dafür ein eigenes Programm schreiben, 
das das Formatieren übernimmt. Ein solches Programm möchte 
ich Ihnen nun vorstellen. 

Dieses Programm ist in der Programmiersprache GFA-BASIC 
geschrieben. Es fragt Sie zuerst, wie viele Seiten, Tracks und 
Sektoren pro Track es in welchem Laufwerk vorbereiten soll. 
Danach geht’s los. 

Zuerst werden alle Tracks mit der eingegebenen Anzahl von 
Sektoren pro Track formatiert. Die Prozedur "Format" formatiert 
den Track T% auf der Seite S%. Danach muß noch der Boot- 
Sektor erstellt werden, was in der Prozedur "Makeboot" 
geschieht. 

Für diesen Zweck wird zunächst vom XBIOS mit der Funktion 
"protobt" (18) ein Prototyp-Boot-Sektor erstellt. In diesem 
Prototyp sind bereits die Informationen über die Anzahl der 
Seiten und der Tracks eingetragen. Einige Einträge müssen wir 
aber noch nachtragen. Dies wird nun erledigt: Die Anzahl der 
Sektoren pro Track und der Gesamtsektoren auf der Diskette 
werden in den Puffer P$ eingetragen. 

Der so erstellte Boot-Sektor wird nun mit der XBIOS-Funktion 
"flopwr" (9) auf den ersten Sektor der Diskette geschrieben. Die 
Diskette ist nun einsatzbereit! Die erreichte Kapazität wird 
schließlich ausgegeben und das Programm neu gestartet. 

i ★*** Disketten-Formatier-Programm **** 

i 

P$=String$(8000,0) ! Puffer für Formatierung 

i 

CLs 

Do 

Print 

Print "**** Disketten-Formatierung ****" 
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Print 

Input "Seiten (1/2) ";Sds% 

Dec Sds% ! Seiten: 0/1 

Input »Tracks (79-82) »;Trs% 

Input "Sektoren (9/10) ";Sec% 

Input "Laufwerk (A/B) ";Lw$ 

Lw%=Asc(UpperS(LwS))-Asc("A") ! LW%=0 (Laufwerk A) oder 1 (B) 

i 

Input "** formatieren (j/n) ** ";F$ 

If Upper$(F$)=»J» 

For T%=0 To Trs%-1 
For S%=0 To Sds% 

@Format(S%,T%) ! Track t%, Seite s% formatieren 
Next S% 

Next T% 

@Makeboot ! Boot-Sektor schreiben 

Endif 
Pause 5 

Print "Es sind nun"'Dfree(Lw%+1) 1 "Bytes frei" 

Loop 

•Procedure Format(Se%,Tr%) 

Stat%=Xbios(10,L:Varptr(PS),L:0,Lw%,Sec%,T r%, Se%, 1,L:&H87654321,0) 

If Stat% 

Print "Fehler"'Stat%'"in Track"'Tr%;", Seite"'Se%'"!" 

Endif 

Return 

•Procedure Makeboot 
P$=String$(512 # 0) 

Stat%=Xbios(18,L:Varptr(P$),L:&H1000000,Sds%+2,0) 

Mid$(PS,25,1)=Chr$(Sec%) 

Sectors%=(Sds%+1)*T rs%*Sec% 

Mid$(P$,20,1)=ChrS(Sectors%) 

MidS(P$,21,1)=Chr$(Sectors%/256) 

Stat%=Xbios(9,L:Varptr(PS),L:0,Lw%,1,0,0,1) 

If Stat% 

Print "Fehler" , Stat% , "beim Schreiben des Boot-Sektors !" 

Endif 

Return 

Wenn bei der Formatierung mit diesem Programm Fehler auf- 
treten, so werden diese unter Angabe des betroffenen Tracks 
und der Seite ausgegeben. Sie sollten dann diese Diskette mit 
Vorsicht genießen, da bei einer guten Diskette keine Fehler 
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auftreten dürfen. Treten die Fehler nur auf Seite 1 (Rückseite) 
auf, so können Sie diese Diskette natürlich noch einmal einseitig 
formatieren und bedenkenlos verwenden. 

Nachdem wir also unsere Disketten so oder so formatiert haben, 
können dort jede Menge Programme untergebracht werden. 
Verwendet man dann auch noch viele Ordner, die wiederum 
Ordner enthalten, so gewinnt man zwar an Übersichtlichkeit, 
verliert allerdings manchmal auch den Überblick, was auf der 
Diskette alles an Dateien vorliegt. Also beginnt man, sich durch 
die diversen Ordner zu klicken, was allerdings schon Zeit und 
Nerven kosten kann! 

Es wird deutlich, daß ein weiteres Programm gebraucht wird. 
Dieses Programm sollte sich dann selbständig durch alle Ordner 
"wühlen" und deren Inhalte komplett ausgeben. Die Ausgabe 
sollte dabei nicht nur auf dem Bildschirm, sondern auch auf 
dem Drucker erfolgen können. Auf diese Weise hätte man ein 
wirklich komplettes Inhaltsverzeichnis einer Diskette, und 
könnte gleichzeitiig sehen, ob nicht diese oder jene Datei dop¬ 
pelt vorhanden ist! 

Das nun folgende Programm erledigt dies. Es ist wieder in 
GFA-BASIC geschrieben und stellt zu Beginn zwei Fragen. Die 
erste ist die nach dem zu durchsuchenden Pfadnamen. Hier kön¬ 
nen Sie entweder nur A: oder auch z.B. A:\TEXTE eingeben, 
wenn Sie nur den kompletten Inhalt eines Ordners haben wollen. 
Die zweite Frage ist schließlich, ob die Ausgabe auch auf dem 
Drucker erfolgen soll. Geben Sie hier ein "J" oder "j" ein, so 
wird die Ausgabe auf dem Bildschirm und dem Drucker er¬ 
scheinen, andernfalls nur auf dem Bildschirm. 

i *** Ausgabe des kompletten Inhaltsverzeichnisses *** 

I 

Dim Count%(20) 

Arrayfill Count 0,0 
Dta%=Gemdos(&H2F) 

Openw 0 

Deftext ,9,,13 
Cls 
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Print "*** Ausgabe des Gesamt-Directories ***" 
Print 

Input "Pfadname ";Fn$ 

FnS=Upper$(Fn$) 

Input "Drucken (j/n) ";Dr$ 

If Upper$(Dr$)="J" 

Df %=1 
Endif 

Deftext ,9,,6 
Cls 

Print "*** Gesamt-Directory im Pfad"'Fn$'"***" 

Print 

If Df% 

Lprint "*** Gesamt-Directory im Pfad^FnS 1 "***" 
Lprint 
Endif 

Deftext ,0 

Clr T% ! Tiefenzähler löschen 


@Sfi rst 
Do 

If Stat% 
@Up 
Else 


! ersten Eintrag suchen 

! wenn nicht gefunden: 

! eine Ebene hoch 


If Typ%=16 ! wenn Ordner 

@Down ! in diesen Ordner runter 

Else 

Print SpaceS(4*T%);FS;Space$(15-Len(FS));Len% 
If Df% 


Lprint Space$(4*T%);FS;SpaceS(15 -Len(FS));Len% 
Endif 

@Snext ! nächsten Eintrag suchen 

Endif 
Endif 


Loop 

i 

Procedure Up 
Print 
If Df% 
Lprint 
Endi f 
Dec T% 

If T%=-1 
End 
Endif 


! und so weiter... 

! eine Ebene hoch (ins Root-Directory) 


! Tiefenzähler -1 
! Ende ! 
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For Sl%=Len(Fn$) Downto 1 
Exit If Mid$(Fn$,Sl%,1)="\" 

Next Sl% 

Fn$=Left$(Fn$,Sl%-1) 

I 

@Sfirst ! ersten Eintrag suchen 

E%=Count%(T%) 

Count%(T%)=0 

For Se%=E% Downto 0 

@Snext ! aktuellen Eintrag suchen 

Next Se% 

i 

Return 

■ 

Procedure Down ! eine Ebene runter (in den Ordner) 

Print 
If Df% 

Lprint 

Endif 

Deftext ,8 

Print Space$(4*T%);F$; ,, : n ! Ordnernamen ausgeben 

If Df% 

Lprint Space$(4*T%);F$;":" 

Endif 

Deftext # 0 
Inc T% 

Count%(T%)=0 

Fn$=Fn$+ ,, \"+FS 

@Sfirst ! ersten Eintrag im Ordner suchen 

Return 


Procedure Sfirst ! ersten Eintrag suchen 

F1$=Fn$+"\*.* ,, +Chr$(0) 
Stat%=Gemdos(&H4E,L:Varptr(F1$),&H10) 

@Getfn 

While Left$(F$, 1 )= ,, . n 
@Snext1 
Exit If Stat% 

Wend 

Return 

i 

Procedure Snext ! nächsten Eintrag suchen 

Inc Count%(T%) 

@Snext1 

Return 
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Procedure Snextl 
Stat%=Gemdos(&H4F) 

@Getfn 

Return 

I 

Procedure Getfn ! Filenamen, Länge und Typ ermitteln 

F$='"' 

For I%=30 To 42 
Exit If Peek(Dta%+I%)=0 
F$=F$+Chr$(Peek(Dta%+I%)) 

Next 1% 

Typ%=Peek(Dta%+21) 

Len%=Lpeek(Dta%+26) 

Return 

Dieses Programm ist manchmal sehr nützlich, auch dann, wenn 
man einfach nur eine bestimmte Datei suchen will. Für die 
Lösung dieses Problems werden Sie allerdings ein noch günsti¬ 
geres Programm im nächsten Kapitel über die Festplatte finden. 
Übrigens ist obiges Programm natürlich auch für Festplatten 
geeignet; Sie müssen dann lediglich als Pfadname z.B. C: ein¬ 
geben. 


7.3 Festplattenbetrieb 

Die Atari-Festplatte SH204 oder SH205 hat eine Kapazität von 
20 MByte. Sie funktioniert auf den ersten Blick genauso wie 
eine Diskettenstation, nur daß die Magnetplatte nicht aus¬ 
wechselbar ist. Und das hat auch seine Gründe. 

Um auf einer diskettenähnlichen Scheibe (in der Festplatte sind 
sogar zwei) eine so große Kapazität bei so kurzen Zugriffszeiten 
realisieren zu können, müssen zum einen die Tracks schmaler 
sein, und zum zweiten muß die Scheibe wesentlich schneller 
rotieren. Dies bedeutet, daß sich sehr kleine Schreib-/Leseköpfe 
mit einer sehr hohen Geschwindigkeit über die Platten bewegen 
müssen. Würden sie wie bei Disketten direkt aufliegen und somit 
schleifen, wären schon bald die Platte und die Köpfe beschädigt 
und somit unbrauchbar. 
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Aus diesem Grund ist in den Festplattengehäusen, die sogar 
luftdicht verschlossen sind, das technische Kunststück vollbracht 
worden, die Köpfe auf einem winzigen Luftpolster über der 
Platte schweben zu lassen. Der so entstandene Luftspalt ist um 
ein Vielfaches dünner als ein menschliches Haar! Würde man 
dabei erlauben, wie bei Disketten die Platten auszuwechseln, so 
würde bereits ein einziges Staubkorn auf der Platte den Kopf 
mit seiner hohen Geschwindigkeit aufprallen lassen. Diesen 
"Unfall" nennt man "Head-Crash", er kann sogar für die Platte 
tödlich enden. Also: keine Wechselmöglichkeit! 

Ein weiterer Unterschied zu einem Diskettenlaufwerk ist, daß 
die Festplatte ständig rotiert. Dadurch werden die hohen An¬ 
laufzeiten umgangen, und der Datenzugriff wird beschleunigt. 
Dies birgt allerdings auch einen Nachteil. 

Um zu gewährleisten, daß die Platte die Betriebsdrehzahl er¬ 
reicht hat, wenn der Rechner darauf zugreift, muß diese VOR 
dem Rechner eingeschaltet werden. Man hört dann das Anlaufen 
des Motors und eine Folge leiser Pieptöne, bei denen auch die 
Activity-Lampe der Festplatte aufleuchtet. In diesem Moment 
findet ein Selbsttest statt, den man nicht unterbrechen darf. 

Eine solche Unterbrechung wäre es, zu dieser Zeit den Rechner 
einzuschalten. Da dieser nach dem Einschalten auf die Platte zu¬ 
greift, um ihren Zustand zu erfahren, würde dieser Zugriff den 
Selbsttest der Platte durcheinanderbringen. Aus diesem Grund 
müssen Sie mit dem Einschalten des Rechners immer warten, bis 
die Festplatte sich beruhigt hat (ca. 20 Sekunden). 

Nun taucht schon das nächste kleine Problem auf. Der Rechner 
weiß nämlich von sich aus nichts mit der Platte anzufangen! 
Wenn Sie also beispielsweise eine leere, formatierte Diskette in 
das Diskettenlaufwerk stecken und den Rechner starten, werden 
Sie nur die bekannten zwei Diskettensymbole auf dem Desktop 
wiederfinden. Sie können nun probieren, was Sie wollen: die 
Festplatte bleibt stumm. 

Des Rätsels Lösung ist, daß das Betriebssystem des ST keinen 
Programmteil enthält, der den direkten Umgang mit der Fest- 
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platte beherrscht. Einen solchen Programniteil nennt man 
Treiber. Damit Sie Ihre für viel Geld erworbene Festplatte auch 
benutzen können, hat Atari auf einer der Festplatte beiliegenden 
Diskette einen solchen Treiber mitgeliefert. Dieses Programm 
sollten Sie zuerst einmal auf Ihre Arbeitsdiskette kopieren, wobei 
Sie es in den AUTO-Ordner legen sollten. 

Wenn Sie also nun diesen Treiber namens AHDI.PRG durch An¬ 
klicken starten oder mit diesem Programm im AUTO-Ordner 
den Rechner starten, wird der Treiber und damit der Zugang 
zur Festplatte installiert. Ist das Programm fertig, so finden Sie 
auf dem Desktop wieder nur die beiden Diskettensymbole 
A und B! 

Aber keine Panik, auch dies ist zu erklären. Erstens ist die Platte 
bei der Auslieferung nicht (oder nicht unbedingt) formatiert, so 
daß der Rechner immer noch nichts damit anfangen kann. 
Zweitens, und das ist noch wichtiger, sind ja im Desktop noch 
keine Symbole für die Festplatte angemeldet. 

Der erste Punkt kann mit dem Programm HDX.PRG bearbeitet 
werden, welches sich auf der Beipackdiskette befindet. Ver¬ 
suchen Sie bitte nicht, die Festplatte mit der Desktop-Option 
"formatiere" zu formatieren, da dies nicht funktionieren kann! 
Beachten Sie bei der Arbeit mit HDX.PRG bitte genau die bei¬ 
liegende Bedienungsanleitung. Sie können mit diesem Programm 
die Festplatte formatieren und in mehrere "Einzelstationen" 
unterteilen, die Partitionen genannt werden. Üblicherweise wer¬ 
den 3 oder 4 Partitionen mit den Kennungen C, D und E (bzw. 
C,D,E und F) gewählt. 

Haben Sie die Partitionierung eingestellt und benannt, so wird 
die Festplatte nach nochmaliger Sicherheitsabfrage formatiert 
und partitioniert. Dies dauert ein wenig, ist aber wirklich nur 
einmal nötig. Ist dies geschehen, so beenden Sie das Programm 
und kehren ins Desktop zurück. Hier werden Sie allerdings im¬ 
mer noch kein Symbol für die Festplatte finden. Dies ist dann 
auch die nächste Aufgabe. 
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Klicken Sie also irgendeines der Diskettensymbole einmal an, so 
daß es invertiert wird. Unter dem Menüpunkt EXTRAS finden 
Sie dann den Auswahlpunkt "Disk anmelden", den Sie nun an¬ 
wählen sollten. In dem darauf erscheinenden Dialogfenster 
ändern Sie die Laufwerksbezeichnung in C (Großbuchstaben 
beachten!) und den darunter stehenden Text in z.B. "Harddisk" 
um. Wenn Sie nun "Anmelden" anklicken, finden Sie auf dem 
Desktop ein weiteres Diskettensymbol mit der eben eingegebenen 
Bezeichnung. Dieses Symbol können Sie dann mit gedrückter 
linker Maustaste an eine beliebige Stelle Ihres Arbeitstisches 
bewegen. 

Diesen Vorgang können Sie nun so oft wiederholen, bis Sie für 
jede Partition ein Symbol vorliegen haben. Die Namen dieser 
Sybole können Sie natürlich variieren, etwa "Texte", "Pro¬ 
gramme" usw. Speichern Sie diese Konfiguration mit dem Menü¬ 
punkt "Arbeit sichern" unter EXTRAS auf Ihrer Diskette ab. 
Wenn Sie nach getaner Arbeit eines der Festplatten-Symbole an¬ 
wählen und den Menüpunkt ’lnfo’ anklicken, so werden Sie bei 
"freie Bytes" beeindruckend vielstellige Zahlen vorfinden. 

Bevor Sie beginnen, die Festplatte zu verwenden, sollten Sie sich 
noch die anderen Programme auf der Beipackdiskette ansehen. 
Sie werden hier, zumindest bei der neuen SH205-Festplatte, fol¬ 
gende Programme finden: 

AHDI.PRG (im AUTO-Ordner) 

CONTROL. ACC 

EMULATOR. ACC 

FOLDRIOO.PRG 

DIRSLEFT.PRG 

HDX.PRG 

HINSTALL.PRG 

SHIP.PRG 

Außerdem sind noch die Dateien 

WINCAP (Parameter für HDX.PRG) 

SH204BOOT.IMG 

SH204ROOT.IMG (Parameter für HINSTALL.PRG) 
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HDX.RSC 

HINSTALL.RSC (Rescource-Dateien) 

enthalten. Diese Dateien gehören zu den Programmen. Hier eine 
Übersicht über die Funktionen der Programme: 


AHDI.PRG 

Ist der Treiber für die Festplatte. Dieses Programm muß vor der 
Arbeit mit der Festplatte einmal gestartet worden sein, wenn die 
Platte nicht selbst den Treiber enthält (siehe HINSTALL.PRG). 

CONTROL.ACC und EMULATOR.ACC 

sind die bekannten Accessories für Kontrollfeld, Schnittstellen- 
und Drucker-Einstellung und Terminal-Emulator. 


FOLDRIOO.PRG 

Dieses Programm dient dazu, einen Fehler im TOS zu beseitigen. 
Dieser Fehler tritt auf, wenn man eine große Anzahl Ordner auf 
seiner Platte verschachtelt. Der ST "vergißt" dann nämlich hin 
und wieder einen dieser Ordner. 

Das Programm FOLDRIOO.PRG sollten Sie also bei der Ver¬ 
wendung vieler Ordner in den AUTO-Ordner legen (es funktio¬ 
niert nur dort!). Es bewirkt dann, daß Sie bis zu 100 Ordner 
verschachteln können. Die 100 im Namen gibt diese Zahl vor. 
Brauchen Sie z.B. 200 Ordner, so nennen Sie das Programm ein¬ 
fach FOLDR200.PRG! 


DIRSLEFT.PRG 

Dieses Programm gibt die Anzahl der noch verfügbaren Ordner 
auf dem Bildschirm aus. 
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HDX.PRG 

Dieses Programm dient zum Formatieren und Partitionieren der 
Festplatte sowie zur Markierung der defekten Sektoren. 


HINSTALL.PRG 

Dies ist ein sehr interessantes Programm! Die oben beschriebene 
Notwendigkeit, das Programm AHDI.PRG einmal zu starten, war 
bei der SH204-Festplatte unumgänglich, da dieses Programm 
nicht beilag. HINSTALL.PRG bewirkt nämlich, daß die Fest¬ 
platte bootfähig wird, also auch ohne Treiber zugreifbar wird. 
Es wird dafür die Datei SH204DVR.SYS auf der Partition C: er¬ 
stellt, was für SH204-Driver (Treiber) steht. Haben Sie dies ge¬ 
tan, so können Sie das AHDI.PRG wieder vergessen! Beim Ein¬ 
schalten des Rechners werden dann der AUTO-Ordner sowie die 
Accessories selbständig von der Festplatte geladen. 


SHIP.PRG 

Da die Schreib-/Leseköpfe der Festplatte sehr klein sind, sind 
sie auch äußerst empfindlich. Wenn Sie also die Festplatte trans¬ 
portieren wollen, so müssen Sie vorher dieses Programm starten. 
Es fährt die Köpfe in eine bestimmte Position, in der sie Er¬ 
schütterungen ertragen können. Diese Position wird bezeichnen¬ 
derweise Park-Position genannt. 

Es ist normalerweise durchaus empfehlenswert, mit Hilfe des 
HINSTALL-Programms die Festplatte bootfähig zu machen, da 
die Notwendigkeit der Verwendung einer Boot-Diskette entfällt. 
Die Sache hat nur den einen Haken, daß ein Programm, das nur 
in Verbindung mit dem AUTO-Ordner funktioniert, nur noch 
bei abgeschalteter Festplatte oder gelöschter bzw. umbenannter 
SH204DVR.SYS-Datei läuft. 

Sie können also nun beginnen, die Festplatte mit Programmen 
und Dateien zu füllen. Es empfiehlt sich dabei, mit mehreren 
Ordnern zu arbeiten, damit die einzelnen Directories nicht zu 
umfangreich und damit unübersichtlich werden. Sollten Sie sehr 
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viele Ordner benötigen, so verwenden Sie bitte auch das 
FOLDRIOO-Programm im AUTO-Ordner! 

Nach einiger Zeit werden Sie sicher feststellen, daß Sie die 
Gesamtverteilung der Programme über die einzelnen Partitionen 
und Ordner nicht mehr im Kopf haben können. An dieser Stelle 
wird es sinnvoll, hin und wieder das im vorherigen Kapitel vor¬ 
gestellte Programm zur kompletten Ausgabe des Inhaltes zu ver¬ 
wenden. Dies produziert jedoch immer eine recht lange Liste. 

Stellen Sie sich nun vor. Sie würden ein bestimmtes Programm 
suchen. Sie wissen genau, daß es sich um ein .BAS-Programm 
handelt und daß es auf Partition C... oder war’s D...? Jetzt wird’s 
schwierig. Sie können natürlich von allen in Frage kommenden 
Partitionen eine komplette Liste mit dem Programm ausgeben 
lassen und diese durchsehen. Wenn es doch möglich wäre, nur 
bestimmte Programme zu suchen! 

Gesagt, getan. Diese Aufgabe löst ein Programm, das unten ab¬ 
gedruckt ist. In diesem Programm werden Sie nach dem ge¬ 
suchten Dateinamen sowie der oder den Laufwerks- bzw. Parti¬ 
tionsbezeichnungen gefragt. Hier gibt es viele Möglichkeiten: 

Die Angabe des Dateinamens kann entweder vollständig oder 
auch mit Platzhaltern geschehen. Diese Platzhalter sind 

* für den Rest des Namensteils und 
? für ein Zeichen im Namen. 

Wenn Sie also z.B. alle Dateien mit der Endung .BAS suchen 
wollen, so geben Sie hier einfach als Namen *.BAS ein. Wenn 
Sie dagegen wissen, daß die Datei z.B. TESTI.BAS oder 
TEST2.BAS heißt, so können Sie dies durch TEST?.BAS an¬ 
geben. Es werden dann alle Dateinamen ausgegeben, die bis auf 
das ? in den Zeichen übereinstimmen. Das ? steht also für jedes 
mögliche Zeichen. Die Angabe *.BAS kann somit auch lauten 
????????.BAS. 

Die zweite Frage, die das folgende Programm stellt, ist die nach 
den zu durchsuchenden Laufwerken. Vermuten Sie die Datei in 
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der Partition C:, so geben Sie hier nur C ein. Soll das Programm 
aber z.B. Laufwerk A, Partition C und E durchsuchen, so geben 
Sie ACE ein (oder ace, Groß-/Kleinschreibung ist egal). 

Das Programm beginnt dann mit seiner Arbeit. Wird eine auf 
den Namen passende Datei gefunden, so wird diese mit vollem 
Namen unter Angabe des dorthin führenden Pfades (z.B. 
C:\BASIC\GRAPHIK, wenn die gefundene Datei in C: im 
Ordner BASIC und dort im Ordner GRAPHIK liegt) ausgegeben. 
Auch nachdem ein Eintrag gefunden wurde, wird dennoch 
weitergesucht, da ein und dieselbe Datei ja auch mehrmals auf 
einer Diskette oder Partition liegen kann. 

Hier nun das in GFA-BASIC geschriebene Programm: 

1 *** Suche nach einem bestimmten File *** 

i 

Dirn Count%(20) 

Dta%=Gemdos(&H2F) 

Openw 0 

Deftext ,9,,13 
Cls 

Print "*** Suche nach einem Dateinamen ***" 

Print 

Input "Filename FileS 

Input "Laufwerk(e) ";Lw$ 

Clr Pfd% 

Cls 

Deftext , , # 6 

i 

Pfad2: 

Arrayfill Count%(),0 
Inc Pfd% 

Fn$=Upper$(Mid$(Lw$,Pfd% # 1))+":" ! Pfadnamen setzen 

Deftext ,9 

Print 

Print "*** Suche nach" 1 File$ M, im Laufwerk"'Fn$'"***" 

Print 

i 

Deftext ,0 

Clr T% ! Tiefenzähler löschen 


@Sf i rst 


! ersten Eintrag suchen 
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Do 

If Stat% ! wenn nicht gefunden: 

If T%=0 ! und das oben, dann Ende 

If Pfd%<Len(Lw$) ! es sei denn.. 

Goto Pfad2 
Else 

Deftext ,9 
Print 


Print "***** das war's ******* 


Input "Bitte Return drücken ",A$ 
Run 


Endif 

Endif 

@Up 

Else 

If Typ%=16 
@Down 
Else 
@Snext 
Endif 
Endif 
Loop 


! eine Ebene hoch 

! wenn Ordner 
! in diesen Ordner runter 


! und so weiter... 


Procedure Up ! eine Ebene hoch (ins Root-Directory) 

Dec T% 

For Sl%=Len(Fn$) Downto 1 
Exit If MidS(Fn$,Sl%,1)="\" 

Next Sl% 

FnS=Left$(Fn$,Sl%-1) 


@Sfi rst 
E%=Count%(T%) 
Count%(T%)=0 
For Se%=E% Downto 0 
@Snext 
Next Se% 


Return 

i 

Procedure Down ! eine Ebene runter (in den Ordner) 

Inc T% 

Count%(T%)=0 

Fn$=Fn$+"\»+F$ 

If Exist(Fn$+"\"+FileS) 

Print "gefunden in"'Fn$ 

Files Fn$+"\"+File$ 
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Endif 
@Sf irst 
Return 


Procedure Sfirst ! ersten Eintrag suchen 

F1$=Fn$+"\*.*"+Chr$(0) 

Stat%=Gemdos(&H4E,L:Varptr(F1$),&H10) 

@Getfn 

While Left$(F$, 1 
@Snext1 
Exit If Stat% 

Wend 

Return 

i 

Procedure Snext ! nächsten Eintrag suchen 

Inc Count%(T%) 

@Snext1 

Return 

Procedure Snextl 
Stat%=Gemdos(&H4F) 

@Getfn 

Return 

i 

Procedure Getfn ! Filenamen, Länge und Typ ermitteln 

F$=" 11 

For I%=30 To 42 
Exit If Peek(Dta%+I%)=0 
F$=F$+Chr$(Peek(Dta%+I%)) 

Next 1% 

Typ%=Peek(Dta%+21) 

Return 

Bevor Sie dieses Programm abtippen, hier noch ein kleiner Tip: 
Einige der in diesem Programm verwendeten Prozeduren ähneln 
denjenigen im vorhergehenden Programm, welches das komplette 
Inhaltsverzeichnis ausgeben kann. Sie können daher einige Pro¬ 
grammteile von dort übernehmen, wenn Sie eventuelle kleine 
Änderungen vornehmen. 
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7.4 RAM-Disk-Programmierung 

Nach der Betrachtung der Disketten und Festplatten wenden wir 
uns nun einer ganz besonderen Art des Massenspeichers zu: der 
sogenannten RAM-Disk. Dieser Ausdruck bezeichnet eine 
scheinbare Diskettenstation, die vollständig im Rechner selbst 
liegt: im Speicher. Der Nachteil dieser RAM-Disk sei hier direkt 
erwähnt: Beim Abschalten des Rechners oder bei einem Strom¬ 
ausfall sind alle dort "untergebrachten” Daten weg. 

Lassen wir diesen Nachteil jedoch einmal unbeachtet, dann 
kommt der große Vorteil zum Vorschein: Eine RAM-Disk ist 
schnell, schneller noch als eine Festplatte. Bei einem so großen 
Speicher wie im Mega ST kommt die große mögliche Speicher¬ 
kapazität hinzu, da man fast beliebig viel von dem Gesamt¬ 
speicher für die Disk reservieren kann. Dadurch kommt man 
ohne weiteres in den Genuß einer schnellen 3,5-MByte-RAM- 
Disk (beim Mega-ST 4). 

Schauen wir uns einmal an, wie man so etwas programmieren 
kann. Das Betriebssystem des ST ist für eine derartige Er¬ 
weiterung vorbereitet und bietet uns 3 Zeiger innerhalb der 
Systemvariablen, die wir verbiegen können. Der erste Zeiger 
(hdv_bpb) zeigt auf eine Routine, die einen Parameterblock mit 
Informationen über die Laufwerke liefert. Der zweite (hdv_rw) 
weist auf die Routine zum Lesen und Schreiben von Einzel¬ 
sektoren. Der dritte schließlich (hdv_mediach) zeigt auf eine 
Testroutine, die feststellt, ob zwischenzeitlich die Diskette 
gewechselt wurde. 

Diese drei Zeiger sind eingeführt worden, um den oben er¬ 
wähnten Harddisk-Treiber bedienen zu können. Dieser Treiber 
verbiegt diese Zeiger auf drei eigene Routinen, die sich auf 
Anforderung melden und die entsprechenden Aufgaben erfüllen. 
Genau dasselbe tun wir für unsere RAM-Disk auch: Wir biegen 
diese Zeiger um. 

Wird eine der drei Routinen dann über den entsprechenden 
Zeiger aufgerufen, so muß sie zuerst feststellen, ob sie auch ge¬ 
meint ist. Ist dies nicht der Fall, so muß sie über den alten 
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Zeiger weiterverzweigen, da dort ja z.B. die eigentlich ge¬ 
meinten Harddisk-Routinen stehen. Andernfalls muß sie die ge¬ 
wünschte Funktion ausführen. 

Um Ihnen die umständliche Erklärung der verschiedenen Para¬ 
meter dieser Funktionen zu ersparen, habe ich Ihnen ein RAM- 
Disk-Programm vorbereitet. Dieses finden Sie im folgenden 
Kapitel. Das Programm ist allerdings weitaus vielseitiger und 
damit länger, als es nötig wäre. Dennoch lohnt es sich bestimmt, 
dieses Programm einzugeben! 

Das nun folgende Programm ist vollständig in Assembler ge¬ 
schrieben. Eine GFA-BASIC-Version wäre leider auch nicht 
möglich, da ein compiliertes GFA-Programm nicht als Accessory 
einsetzbar ist (Stand 10/87). Auch soll die RAM-Disk ja mög¬ 
lichst schnell sein, was die Verwendung eines Assembler-Pro¬ 
gramms anbietet. 

Wenn Sie dieses Programm also z.B. unter dem Namen 
RAMDISK.ACC auf Ihrer Boot-Diskette bzw. Partition C der 
bootfähigen Festplatte abspeichern und dann Reset drücken, fin¬ 
den Sie nach Beendigung des Boot-Vorganges einen weiteren 
Menüpunkt unter dem Desk-Menü: RAM-Disk. Wenn Sie diesen 
Punkt anwählen, erscheint ein Alert-Fenster mit drei Auswahl¬ 
punkten. Der erste mit der Aufschrift ’Exit’ bricht den Vorgang 
ohne Folgen ab - er ist sozusagen der Notausgang. 

Der zweite Knopf ist mit "mehr" beschriftet. Wenn Sie diesen 
Knopf anklicken, so verändert sich die Aufschrift des dritten, 
und zwar wird die Zahl dort jeweils um 500 erhöht bzw. nach 
3500 auf 0 gesetzt. Diese Zahl stellt die Größe der zu installie¬ 
renden RAM-Disk in KByte dar, wobei die 0 das Abmelden der 
RAM-Disk bedeutet. 

Haben Sie durch wiederholtes Anklicken des mehr-Knopfes die 
gewünschte Größe der Disk eingestellt, so klicken Sie den Knopf 
mit der Zahl an. Die RAM-Disk mit der gewählten Größe wird 
nun automatisch eingerichtet. Bitte beachten Sie dabei: Sollte sie 
bereits installiert gewesen sein, so wird der alte Inhalt gelöscht! 
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Sie können nun die RAM-Disk, die die Kennung "F:" trägt, 
durch den Menüpunkt "Diskstation anmelden" auf das Desktop 
bringen und dort durch "Arbeit sichern" fest installieren. Danach 
können Sie wie gewohnt mit dieser "Diskettenstation" arbeiten, 
allerdings nur File für File; vollständig kopieren läßt sich ihr 
Inhalt nicht. 

Nach Beendigung Ihrer Arbeit sollten Sie immer erst überprüfen, 
ob Sie alle wichtigen Dateien von der RAM-Disk auch auf einen 
nichtflüchtigen Datenträger kopiert haben. Wenn der Rechner 
erst einmal ausgeschaltet war oder die Reset-Taste betätigt 
wurde, ist der alte Inhalt der RAM-Disk unwiederbringlich 
verloren! 

Diese Beschreibung der Arbeit mit der RAM-Disk gilt für viele 
der auf dem Markt befindlichen RAM-Disk-Programme. Um 
die Arbeit mit dieser Version komfortabler und einfacher zu 
gestalten, habe ich in dieses Programm eine zusätzliche Funktion 
eingebaut. Diese Funktion ermöglicht ein automatisches Konfi¬ 
gurieren der RAM-Disk beim Einschalten des Rechners! 

Diese Automatik funktioniert folgendermaßen: 

Beim Start des Programms wird die aktuelle Diskette (die Boot- 
Diskette) nach einer Datei namens RDKONF.INF durchsucht. Ist 
diese Datei nicht vorhanden, so findet die Konfiguration nicht 
statt. Andernfalls wird ihr Inhalt geladen und ausgewertet. 

Die Datei RDKONF.INF muß von Ihnen selbst erstellt werden. 
Dies kann mit einem einfachen Text-Editor geschehen, da es 
sich dabei um eine reine Textdatei handelt, die Datei ist folgen¬ 
dermaßen aufgebaut: 

In der ersten Zeile darf nur eine Ziffer zwischen 0 und 7 
stehen. Diese Ziffer gibt die Größe der RAM-Disk in 500- 
KByte-Schritten an (0:0 KByte, 1:500 KByte, 2:1 MByte usw.). 
Dahinter muß ein Return und ein Line-Feed folgen (<CRxLF> 
bzw. 13,10). Vergewissern Sie sich bitte, ob der von Ihnen ver¬ 
wendete Texteditor dies auch pro Zeile anhängt! Der Editor des 
K-SEKA beispielsweise eignet sich hierzu. 
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Die zweite Zeile kann nun ebenfalls nur aus Return bestehen. In 
diesem Fall wird die Konfiguration an dieser Stelle beendet und 
ins Desktop zurückgegeben. Die RAM-Disk hat dann die ge¬ 
wünschte Größe. Andernfalls wird in der zweiten sowie in den 
folgenden Zeilen die Angabe eines Dateinamens mit kompletter 
Pfadangabe (z.B. A:DOODLE.PRG) erwartet. Diese Dateien wer¬ 
den dann nämlich der Reihe nach in die RAM-Disk kopiert, 
währenddessen dieser Pfadname auf dem Bildschirm ausgegeben 
wird. 

Als Abschluß der Konfigurationsdatei RDKONF.INF muß eine 
Leerzeile folgen (nur <CRxLF>). An dieser Stelle ist die Kon¬ 
figuration beendet. 

Auf diese Weise können Sie nun Arbeitsdisketten anlegen, die 
die Arbeit mit der RAM-Disk vorbereiten. Auf einer solchen 
Diskette müssen dann das RAM-Disk-Accessory, die 
RDKONF.INF-Datei sowie die in die RAM-Disk zu kopieren¬ 
den Dateien liegen. Diese Dateien können natürlich auch in 
einem Ordner liegen, um die Diskette übersichtlich zu halten. 
Lediglich das .ACC- und das .INF-File müssen im obersten 
Directory vorliegen. Übrigens: wenn Sie eine bootfähige Hard¬ 
disk verwenden, werden Boot-Disketten nicht mehr als solche 
erkannt. Das Accessory muß dann auf Partition C liegen. 

****** Luxus-RAM-Disk-Accessory 10/87 S.A.D. ***** 

hdv_bpb = $472 

hdv_rw = $476 

hdv_mediach = $47e 

drvbits = $4c2 

drivebit = 5 ;0=A, 1=B,...,5=F 

Start: 

move.l #nstapel,a7 ;neuer Stack 

move #10,opcode ;appl_init 

move #0,sintin 

move #1,sintout 

move #0,saddrin 

move #0,saddrout 

bsr aes 

move intout.appid 
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move 

#77,opcode ;graf_handle 

move 

#5 # sintout 

move 

#0,saddrin 

move 

#0,saddrout 

bsr 

aes 

move 

intout,grhandle 

move 

#35,opcode ;Menü*Eintrag einsetzen 

move 

#1,sintin 

move 

#1,sintout 

move 

#1,saddrin 

move 

appid,int in 

move. 

l #accname,addrin 

bsr 

aes 

move 

intout,accid 

bsr 

autokonf ;ggf. Auto-Konfiguration 

;Ab hier die 

Bereitschafts-Schleife 

loop: bsr 

event ;Event_Multi 

cmp 

#40,msgbuff ;Acc_open ? 

bne 

loop 

move 

msgbuff+8,d0 

cmp 

accid,d0 ;Accessory# ? 

bne 

loop ;nein 

bsr 

run ;sonst bearbeiten! 

bra 

loop 


;*** automatische Konfiguration 

, *** 

autokonf: 

clr 

-<sp) 

;nur Lesen 

pea 

fname 


move 

#$3d,-(sp) 


trap 

#1 

;Open »RDKONF.INF" 

addq.1 

#8,sp 


move 

d0,handle 


tst. 1 

dO 


bmi 

kende 

;nicht vorhanden! 

pea 

cpuff+2 


move.1 

#512 f -(sp) 

;512 Bytes lesen 

move 

handle,-(sp) 
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move 

#$3f,-(sp) 

trap 

#1 

add.l 

#12,sp 

move 

handle,-(sp) 

move 

#$3e,-(sp) 

trap 

#1 

addq.1 

#4,sp 

/* Autokonfiguration auswerten: 

clr. 1 

dO 

move.b 

cpuff+2,d0 

and 

#7,d0 

Isl 

#1 ,d0 

cmp 

#16,dO 

bhs 

kende 

move 

d0,size 

lea 

sizes,a0 

move 

0(a0,d0),kapazi 

Isl 

#1 ,d0 

lea 

dezi,a0 

move.1 

0(a0,d0),offer 

bsr 

ok 

/** ggf. angegebene Files in F: 

lea 

cpuff+3,a0 

cmp.b 

#13,(a0)+ 

bne 

kende 

move.1 

aO,temppnt 

kloopl: 

move.1 

temppnt,aO 

cmp.b 

#10,(a0)+ 

bne 

kende 

cmp.b 

#13,(aO) 

beq 

kende 


;** File kopieren ** 

move.l a0,oldpnt 
move.l a0,a6 


;in Puffer lesen 


;Close 


, 0-7'<CR>Fname.ext<CR>...<CR><CR> 


;Größenangabe 0-7 holen 
;*2: 'size' errechnen 
;zu groß: falscher Wert! 
;Größe setzen 
;Kapazität setzen 


;Text setzen 

/Speicher reservieren 

kopieren ** 

;2.Zeichen 
;CR ? 

/falsches Format! 
/Zeiger retten 


/Zeiger holen 
;LF ? 

/nein: falsches Format! 
/File-Ende ? 

/ja! Ende der Konfiguration! 


/Filenamens-Anfang retten 
/Destination-Anfang vorbereiten 
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kloop2: 



cmp.b 

#'V ,(a0) 


beq 

seta6 


cmp.b 

(aO) 


bne 

nodp 

seta6: 


move.1 

a0 # a6 


addq.1 

#1 ,a6 

nodp: 


cmp.b 

#13,(a0)+ 


bne 

kloop2 


clr.b 

-1(a0) 


move.1 

aO,temppnt 


move.1 

oldpnt,-(sp) 


move 

o. 

CL 

</) 

S 


trap 

#1 


addq.1 

#6,sp 


pea 

crlf 


move 

#9,-(sp) 


trap 

#1 


addq.1 

#6,sp 


move 

#0,-(sp) 


move.1 

oldpnt,-(sp) 


move 

#$3d,-(sp) 


trap 

#1 


addq.1 

#8,sp 


move 

dO,handle 


tst. 1 

dO 


bmi 

kende 


move 

#0,-(sp) 


subq.1 

#2,a6 


move.b 

#'F',(a6) 


move.b 

#': 1 ,1(a6) 


move.1 

a6,-(sp) 


move 

#$3c,-(sp) 


trap 

#1 


addq.1 

#8,sp 


move 

dO,dhandle 


tst. 1 

dO 


bmi 

kende 


;A6 auf Namensanfang 
;CR ? 

;NULL ans Ende des Namens 
;Zeiger retten 

;Print Line: 

;Source-Namen ausgeben 

;CR, LF ausgeben 

;zum Lesen 
;Source-File 

;Source-File öffnen 

;nicht vorhanden! 

;Lesen/Schreiben 

;F: setzen (!!!) 

;Destination-File erstellen 

;nicht geöffnet! 



506 


Das große Mega-ST-Buch 


copylop: 


copyend: 


pea 

tpuff 

move.1 

#512,-(sp) 

move 

handle,-(sp) 

move 

#$3f,-(sp) 

trap 

#1 

add.l 

#12,sp 

tst. 1 

dO 

bmi 

copyend 

move 

dO,-(sp) 

pea 

tpuff 

move.1 

dO,-(sp) 

move 

dhandle,-(sp) 

move 

#$40,-(sp) 

trap 

#1 

add.l 

#12,sp 

move 

(sp)+,d0 

cmp 

#512,dO 

beq 

copylop 


move 

handle,-(sp) 

move 

#$3e,-(sp) 

trap 

#1 

addq.1 

#4,sp 

move 

dhandle,-(sp) 

move 

#$3e,-(sp) 

trap 

#1 

addq.1 

#4,sp 

bra 

kloopl 


;512 Bytes 

;in Puffer lesen 

;512 Bytes 

;aus Puffer schreiben 

;war es komplett? 

;ja: weiter 

;Close Source 

;Close Destination 

/nächste Datei.. 


kende: 

rts 


/**** Hierher nach Anwahl des Accessories **** 
run: 

move.l #wieviel,addrin 

bsr formalert /Auswahl darstellen 

intout,choice 
#1,choice 


move 

cmp 


Exit? 
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beq okx 

cmp #3,choice 
beq ok 

addq #2,size 

cmp #16,size 

blt more 

clr size 

more: 

lea 
clr. I 
move 
move 
Isl 
lea 

move.I 
bra 

;** Speicher reservieren ** 


ok: 



bsr 

mf ree 


tst 

size 


bne 

okl 

okx: 

rts 


okl: 

move 

#2,changed 


clr. 1 

d7 


move 

kapazi ,67 


add.l 

#9,d7 


asl. 1 

#5,d7 


asl. 1 

#5,d7 


move.1 

d7,-(sp) 


move 

#$48,-(sp) 


trap 

#1 


addq.1 

#6,sp 


;ja: Exit 
/OK ? 

;Ja 

/andere Größe anbieten 


/Speicher frei geben 
/neue Größe? 

;ja 

/0 Kbyte 

/Diskette wird 'gewechselt' 


/anzumeldender RAM-Bereich 
/MALLOC-Funktion 


sizes # a0 

dO 

size # d0 

0(a0,d0),kapazi /Kapazität setzen 

#1,d0 

dezi,a0 

0(a0,d0),offer /Angebot setzen 
run 


tst.l dO 
beq fehler 

addq.I #1,d0 

bclr #0,d0 /Adresse aufrunden 

move.l dO,puffer 
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move.1 

#init,-(sp) 


move 

#38,-(sp) ;Initialisierung im Supervisor 


trap 

#14 


addq.1 
rts 

#6,sp 

fehler: 


move.1 

#error,addrin 

doerr: 


bsr 

formalert ;Fehler !! 


bra 

ende 

irrit: 


move.1 

hdv_bpb,bpbsave 


move.1 

#bpb,hdv_bpb 


move.1 

hdv_rw,rwsave ;Vektoren auf neue Routinen setzen 


move.1 

#rw,hdv_rw 


move.1 

hdv_mediach,mediasave 


move.1 

#media,hdv_mediach 


move.1 

puffer,a0 


move.1 

#2304,dO 

iloopl: 


clr. 1 

(a0)+ ;die RAM-Disk löschen (1. Track) 


dbra 

dO,iloopl 

;* Boot 

-Sektor 

generieren * 


move.1 

puffer,aO 


add.l 

#11,a0 


Lea 

boottab,a1 


moveq 

#tabend-boottab-1 ,d0 

bloop: 


move.b 

(a1)+,(a0)+ ;Daten in Boot-Sektor kopieren 


dbra 

dO,bloop 


move 

kapazi,d7 


move 

d7,numcl ;Kapazität in KByte in BPB 


Isl 

#1,d7 ;Kapazität in Sektoren 


add 

#18,d7 ;plus 18 Sektoren 


move.1 

puffer,aO 


move.b 

d7,19(a0) ;LO 


Isr 

#8,d7 


move.b 

d7,20(a0) ;HI 
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bset 

rts 

#drivebit,drvbits+3 ;Drive F anmelden 

bpb: 

cmp 

#drivebit,4(sp) ;Drive F ? 


beq 

bpbl ;j a 


move. l 

bpbsave,aO ;sonst alte Routine 


jmp 

CaO) 

bpbl: 

move.1 

rts 

#bpbtab,d0 ;Zeiger auf BIOS-Parameter-Block 

rw: 

cmp 

#drivebit,14(sp) ;Drive F ? 


beq 

rwl ;ja 


move.1 

rwsave,a0 ;sonst alte Routine 


jmp 

(a0) 

rwl: 

move 

12(sp),d0 ;recno, logische Sektor Nummer 


ext.l 

dO 


Isl.l 

#8,d0 


Isl.l 

#1 ,d0 ;mal 512 


move.1 

6(sp),a0 ;Puffer-Adresse 


move 

10(sp) # d1 ;Anzahl Sektoren 


subq 

#1,d1 


move.1 

puffer,a1 ;Basis-Adresse 


add.l 

d0,a1 ;plus relative Adresse in RAM-Disk 


move 

4(sp) # d0 ;rwflag 


btst 

#0,d0 ;lesen ? 


beq 

rloopO ;ja 


exg 

a0 # a1 ;Ziel und Quelle vertauschen 


btst 

#0,9(sp) ;gerade Pufferadresse? 


beq 

rloopl ;ja! 

rloopO: 

move.1 

#64-1,d0 ;ein Sektor/8 

rloop: 

move.b 

(a1)+,(a0)+ ;Puffer kopieren (Byteweise) 


move.b 

(al)+,(a0)+ 


move.b 

(al)+,(a0)+ 


move.b 

(al)+,(a0)+ 


move.b 

(al)+,(a0)+ 


move.b 

(al)+,(a0)+ 


move.b 

(al)+,(a0)+ 


move.b 

(al)+,(a0)+ 


dbra 

dO,rloop 


dbra 

dl,rloopO /nächster Sektor 
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clr dO ;0K 

rts 


rloopl: move.l 

#32-1 f d0 

;ein Sektor/8 

rloop2: move.l 

(al)+,(a0)+ 

;Puffer kopieren (Wortweise) 

move.1 

(al)+,(a0)+ 


move.1 

(al)+,(a0)+ 


move.1 

(a1)+ / (a0)+ 


dbra 

d0,rloop2 


dbra 

dl,rloopl 

;nächster Sektor 

clr 

dO 

;0K 

rts 



media: cmp 

#drivebit,4(sp) 

;Drive F ? 

beq 

medial ;ja 


move.1 

mediasave,aO 

;alte Routine 

jmp 

(a0) 


medial: move 

changed,dO 

,-Diskette evtl, gewechselt 

clr 

changed 


rts 



event: 



move 

#25,opcode 

;Event_Multi 

move 

#16,sintin 


move 

#7,sintout 


move 

#1,saddrin 


move.1 

#msgbuff,addrin 


lea 

table,a1 


lea 

intin,a2 


moveq 

#15,dO 


lopl: 



move 

(al)+,(a2)+ 

/Parameter setzen 

dbra 

dO,lopl 


aes: 


;AES-Aufruf 

move.1 

#aespb,d1 


move 

#$c8,d0 


trap 

#2 


rts 



mfree: 


/Speicher frei geben 

tst. 1 

puffer 


beq 

ende 

/ist bereits abgemeldet 
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move.1 

#reinit,-(sp) 



move 

#38,-<sp) 

;Reinitialisierung 


trap 

#14 



addq.1 

#6,sp 



move.1 

puffer,-(sp) 



move 

#$49,-(sp) 

;HFREE 


trap 

#1 



addq.1 

#6,sp 



tst. 1 

dO 

;Error? 


beq 

ende 

;nein 


move.1 

#error1,addrin 



bsr 

formalert 

;Error-Meldung 

ende: 

clr. 1 

puffer 



rts 



reimt: 

move.1 

bpbsave,hdv_bpb 



move.1 

rwsave,hdv_rw 

;Vektoren auf alte Rout in« 


move.1 

mediasave,hdv_mediach 


bclr 

#drivebit,drvbits+3 ;Drive F abmelden 


rts 



formalert: 




move 

#52,contrl 

;form_alert 


move 

#1,contrl+2 



move 

#1,contrl+4 



move 

#1 ,contrl+6 



move 

#0,contrl+8 



move 

#1,intin 



bra 

aes 



table: 

dc.w 

$13,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0 

accname: 

dc.b 

11 RAM-Disk",0 

crlf: 

dc.b 

10,13,0 

fname: 

even 

dc.b 

“rdkonf.inf",0 

wieviel: 

dc.b 

"[2][Wieviel RAM-Disk-KByte ?]" 


dc.b 

11 [ Exit | mehr |" 

offer: 

dc.b 

" 500 ]",0 

error: 

dc.b 

"[1][Nicht genug RAM !]" 


dc.b 

"[Dann nicht..]",0,0 


setzen 



512 


Das große Mega-ST-Buch 


errorl: dc.b "[1] [Fehler bei MFREE !]" 
dc.b "[Dann nicht..]",0 


even 

kapazi: 

dc.w 500 


size: 

dc.w 2 


sizes: 

dc.w 0,500,1000, 

1500,2000,2500,3000,3500 

dezi: 

dc.b ' 0 500100015002000250030003500' 

puffer: 

de. 1 0 

;Platz für RAM-Disk-Puffer-Adresse 

aespb: 

de.1 contrl,global,int in,intout,addrin,addrout 

contrl: 

opcode: 

blk.w 1 


sintin: 

blk.w 1 


sintout: 

blk.w 1 


saddrin: 

blk.w 1 


saddrout 

blk.w 5 

: blk.l 1 


global: 

blk.l 8 


int in: 

blk.w 80 


ptsin: 

blk.w 80 


intout: 

blk.w 80 


ptsout: 

blk.w 80 


addrin: 

blk.w 80 


addrout: 

blk.w 80 


bpbtab: 

recsiz: 

dc.w $200 

;Sektorgröße 

c l s i z: 

dc.w 2 

;Cluster-Größe in Sektoren 

clsizb: 

dc.w $400 

;Cluster-Größe in Bytes 

rdlen: 

dc.w $10 

;Directory-Länge in Sektoren 

fsiz: 

dc.w $12 

;FAT-Größe 

fatrec: 

dc.w $13 

;FAT-Sektoren 

datrec: 

dc.w $35 

;Sektoren für Verwaltung 

numcl: 

blk.w 1 

/Kapazität in KByte 

flags: 

de.1 0,0,0,0 


boottab: 


/Daten in 8086-format 


dc.b 0,2 

/Bytes pro Sektor 


dc.b 2 

/Sektors pro Cluster 


dc.b 1,0 

/reserved Sektors 


dc.b 2 

/FATs 


dc.b 112,0 

/Directory entries 
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blk.b 2 

;Sektors on media 

dc.b 0 

;media descriptor 

dc.b $12,0 

;Sektors pro FAT 

dc.b 9,0 

;Sektors pro Track 

de 

.b 1,0 

;Sides 

dc.b 0 

;hidden 

tabend: 



bpbsave: 

blk.l 1 

;Platz für alte Vektoren 

rwsave: 

blk.l 1 


mediasave: 

blk.l 1 


changed: 

dc.w 0 


handle: 

blk.w 1 


dhandle: 

blk.w 1 


umsec: 

blk.l 1 


choice: 

blk.w 1 

;Auswahl 

oldpnt: 

blk.l 1 


temppnt: 

blk.l 1 


grhandle: 

blk.w 1 


appid: 

blk.w 1 

;Application- ID 

accid: 

blk.w 1 

;Accessory-Unit 

cpuff: 

blk.b 512 


tpuff: 

blk.b 512 


msgbuff: 

blk.b 16 



blk.l 128 

;neuer Stack 

nstapel: 

blk.l 1 



7.5 Differenzen in der Speicherverwaltung 

Der Mega ST hat im Gegensatz zu seinen kleinen Brüdern 
260/520/1040 ST das zwei bis vierfache an Speicherkapazität 
eingebaut. Diese riesige Speichermenge verwaltet die MMU 
(Memory Management Unit) des ST, die das physikalisch im 
Adreßbereich verteilte RAM als kontinuierlichen Speicher an¬ 
bietet. Diese MMU hat in ihrem Konfigurationsregister 
(SFF8001) den Wert 2 für 2 MByte und 10 für 4 MByte liegen, 
was die Aufteilung der einzelnen Speicherbänke repräsentiert. 

Nun gibt es hin und wieder (hoffentlich nie) den Fall, daß man 
ein Programm besitzt, das nur mit z.B. 1 MByte funktioniert. 
Dies kann verschiedene Gründe haben, z.B. daß es direkt auf 
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den vermeintlichen Bildschirmspeicher ab $F8000 zugreift, wo 
im Mega ST ja nur normaler Speicher liegt. In diesem Fall wäre 
es nun recht einfach, wenn man einfach der MMU sagen 
könnte, es wäre nur 1 MByte vorhanden. 

Dies ist in der Praxis allerdings mit Problemen verbunden. Der 
Grund für dieses unwillige Verhalten ist der, daß die Aufteilung 
der Speicherbänke bereits vorgenommen wurde, bevor man ein 
Programm zu deren Änderung starten kann.Um eine neue Kon¬ 
figuration zu setzen, müßte ein Neustart des Systems vorgenom¬ 
men werden, und dabei würde die MMU wieder auf 2 bzw. 4 
MByte eingestellt. 

Ein wesentlich einfacherer Weg zur "Speicher-Vernichtung" ist 
der, die dokumentierten Systemvariablen zu verändern. Hierfür 
bieten sich die beiden Register "phystop" ($42E) und "memtop" 
($436) an. Wir brauchen somit nur diese beiden Register zu 
manipulieren und einen Reset durchzuführen. Der Rechner stellt 
dann in der Reset-Bearbeitung fest, daß die Speicherkonfigura¬ 
tion bereits festgelegt ist, und führt seine Initialisierung mit den 
Werten durch, die wir vorgegeben haben. 

Da der Zugriff auf diese Systemvariablen privilegiert ist, muß 
diese Manipulation im Supervisor-Modus des Prozessors durch¬ 
geführt werden. Für die Umschaltung in diesen Modus aus dem 
User-Modus gibt es zwei Möglichkeiten: die GEMDOS-Funktion 
"Super" ($20) und die XBIOS-Funktion "Supexec" ($26). Erstere 
schaltet den Prozessor lediglich in den Supervisor-Modus um 
und liefert als Rückgabe-Parameter den alten User-Stackpointer 
in DO. Die andere Funktion des XBIOS dagegen ruft eine 
Unterroutine, die mit RTS endet, im Supervisor-Modus auf. 

Hier nun ein kleines Maschinenprogramm, das die Umschaltung 
vornimmt, die Systemvariablen manipuliert und einen Reset 
durchführt. Nach der Ausführung dieses Programms ist der 
Mega ST auf 1 MByte RAM "beschnitten", und zwar Reset-fest. 
Um wieder in den Genuß des vollen Speichers zu gelangen, muß 
man den Rechner etwa 10 Sekunden lang ausschalten. 
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■***** 

1 

RAM-Killer S.D. ***** 


run: 

clr. 1 

move 

trap 
addq.1 

-(sp) 

#$20,-(sp) 

#1 

#6,sp 

;Super 

;in Supervisor umschalten 


move.1 
move.1 

ram,$42e 

screen,$436 

;RAM-Top und 
;Mem-Top neu setzen 


reset 


;und RESET 

ram: 

screen: 

de. 1 
de. 1 

$100000 

$100000-$8000 

;neues RAM-Top (1 MByte) 

;Screen-Anfang 


Dieses Programm wurde auf dem K-SEKA geschrieben. Wenn 
Sie einen anderen Assembler, etwa den Profimat, verwenden 
wollen, müssen Sie anstelle der blk-Anweisungen "ds" einsetzen. 
Außerdem muß dann am Ende des Programms ein "END" stehen. 

Wenn Sie überhaupt keinen Assembler besitzen, so können Sie 
auch folgendes GFA-BASIC-Programm eingeben. Dieses Pro¬ 
gramm erstellt das Programm RAMKILL.PRG auf Diskette A:. 


a$="" 
clr sum% 
for i%=1 to 74 
read c% 
add sum%,c% 
a$=a$+chr$(c%) 
next i% 
if sum%=2043 

bsave "A:RAMKILL.PRG",varptr(a$),74 
eise 

?"*** Prüfsummenfehler ! *** 
endif 
end 

i 

data 96,26,0,0,0,40,0,0,0,0,0,0,0,0,0,0 
data 0,0,0,0,0,0,0,0,0,0,0,0,66,167,63,60 
data 0,32,78,65,92,143,35,249,0,0,0,32,0,0,4,46 
data 35,249,0,0,0,36,0,0,4,54,78,112,0,16,0,0 
data 0,15,128,0,0,0,0,12,10,0 
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Die Funktion des RAMKILL-Programms ist auch in GFA- 
BASIC selbst ausführbar, sogar wesentlich einfacher. Sie müssen 
hier nur eingeben: 

Slpoke &H42E,&H100000 
Slpoke &H436,&Hf8000 

Danach müssen Sie die Reset-Taste drücken. Das ist alles! 


7.6 Die wichtigsten RAM-Vektoren 

Die Belegung des GEMDOS-Variablenspeichers ist normaler¬ 
weise für den Programmierer nicht sehr interessant. Für (fast) 
alle Funktionen, die sich mit diesen Variablen realisieren lassen, 
gibt es eine GEMDOS- bzw. BIOS-Funktion. Einige dieser 
Funktionen tun auch nichts anderes als eine oder mehrere 
Variablen zu verändern bzw. auszulesen. 

Der Haken an der Sache ist allerdings der, daß die Zeit, die für 
die gesamte TRAP-Bearbeitung innerhalb des Betriebssystems 
benötigt wird, bei solchen Funktionen unverhältnismäßig lang 
ist. Aus diesem Grund ist es manchmal durchaus sinnvoll, direkt 
auf die Variablen zuzugreifen. Außerdem ist auf diese Weise so 
mancher Trick möglich, der über die korrekten GEMDOS- 
Funktionen nicht oder nur sehr umständlich zu realisieren ist. 

Wir wollen aus oben genannten Gründen einige der interes¬ 
santesten RAM-Variablen betrachten, die das Blitter-TOS des 
Mega ST verwendet. Mit diesen Werten können Sie nicht nur 
einfache eigene Programme schreiben (die allerdings dann nur 
auf dem Mega ST bzw. mit Blitter-TOS arbeiten), sondern auch 
bestehende Programme an den Mega ST anpassen. Für diesen 
Zweck wird gleichzeitig die Adresse der Variablen beim alten 
TOS in Klammern angegeben. 

Zuerst nehmen wir uns die sogar dokumentierte 
Systemvariablen-Liste vor. Diese Variablen liegen bei jeder 
TOS-Version an der gleichen Stelle, und zwar ab $400. Die dort 
enthaltenen Variablen bedeuten: 
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$400 - $41F 
$420 

$424 

$426 

$42A 

$42E 

$432 

$436 

$43A 

$43E 

$440 

$442 

$444 


$446 

$448 

$44A 

$44C 

$44E 

$452 

$454 

$456 

$45A 

$45E 

$462 

$46A 

$46E 

$472-$481 

$482 

$484 

$48E 


Sprungadressen (Vektoren) 

enthält eine "magische Zahl", die einen erfolg¬ 
reichen Kaltstart anzeigt 

Speicher-Konfiguration (= 4 bei 512 KByte, 5 bei 
1 MByte) 

noch eine magische Zahl, die bewirkt, daß bei 

RESET ein Kaltstart erfolgt 

Zeiger auf die Kaltstart-Routine 

Zeiger auf RAM-Ende ($80000 bei 512 KByte 

$F0000 bei 1 MByte) 

Zeiger auf Arbeitsspeicher-Anfang 
Zeiger auf Arbeitsspeicher-Ende 
schon wieder eine magische Zahl, die einen er¬ 
folgreichen Kaltstart anzeigt 
DMA-Flag, muß <>0 sein! 
eingestellte Floppy-Geschwindigkeit (3) 
System-Timer in Millisekunden (20 für 50 Hz) 
Floppy-Vergleichs-Flag. Wenn <>0, dann wird je¬ 
der Schreibvorgang durch Lesen getestet. Wenn 0, 
dann nicht (schreibt schneller) 

Nummer des Geräts, von dem das System geladen 
ist 

PAL/NTSC-Flag (<>0 : PAL ; =0 : NTSC) 
eingestellte Bildschirmauflösung 
aktuelle Bildschirmauflösung (0-2) 

Zeiger auf Bildschirmspeicher-Anfang 

VBI-Flag. Sollte 1 sein (VBI = Vertical Blank 

Interrupt) 

VBI-Routinenanzahl (8) 

Zeiger auf VBI-Zeiger-Tabelle 
Zeiger auf neue Farbtabelle (wenn neu) 

Zeiger auf neuen Bildspeicher (wenn neu) 
VBI-Zähler 

ausgeführte VBI-Zähler 

Zeiger auf Routine bei Monitorwechsel (Kaltstart) 
Festplattenparameter (0, wenn keine da) 
wenn <>0, ist COMMAND.PRG geladen worden 
Tastatur-Status (Bit 0 : Glocke an/aus, Bit 1 : 
Keyrepeat an/aus, Bit 2 : Tastenklick an/aus) 
Arbeitsspeichergrenzen (nicht verändern!) 
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$4A2 

$4A6 

$4AE 

$4B4 

$4B8 

$4BC 

$4C4 

$4C6 

$4EE 

$4F2 

$4F6 

$4FA 

$4FE 

$502 

$506 

$50A 

$50E 

$512 
$51A 

$51E-$53D 

$53E-$55D 

$55E-$57D 

$57E-59D 


Zeiger auf Registerspeicher des BIOS 
Anzahl der angeschlossenen Disk-Laufwerke 
Zeiger auf Prozessorzustandsspeicher 
Zeiger auf Datensektor-Zwischenspeicher 
Zeiger auf Inhaltsverzeichnis-Puffer 
200 Hz-Zähler 

ist 3, wenn Floppies angeschlossen sind 
Zeiger auf 1 KByte Disk-Puffer 
Hardcopy-Flag (wenn 0, dann Bildausdruck) 
Zeiger auf Betriebssystem-Start 
Zeiger auf Grafik- bzw. Textsegment 
Zeiger auf Betriebssystem-Ende 
Zeiger auf AES-Textsegment 
Zeiger auf Hardcopy-Routine 
Zeiger auf Druckerstatusroutine für Hardcopy 
Zeiger auf Druckausgaberoutine für Hardcopy 
Zeiger auf Routine, die den RS232-Status ermit¬ 
telt (für Hardcopy) 

Zeiger auf serielle Ausgaberoutine (Hardcopy) 
magische Zahl $5555AAAA, wenn Speicherkonfi¬ 
guration gültig 

8 Zeiger, die auf Routinen zur Eingabe-Status- 
Ermittlung der Geräte 0-7 zeigen 
8 Zeiger auf die Eingaberoutinen 
8 Zeiger auf Routinen zur Ausgabe-Status-Er- 
mittlung 

8 Zeiger auf Zeichenausgaberoutinen 


Soweit also die offiziellen Systemvariablen der Atari-ST-Serie. 
Nun folgen die inoffiziellen Variablen, die von TOS-Version zu 
TOS-Version verschieden sind. Die angegebenen Adressen gelten 
für das Blitter-TOS, in Klammern dahinter stehen die Adressen 
aus der alten TOS-Version. 


$E12 


($DCC)Tabelle mit 9 Zeigern auf Routinen für 
die Verarbeitung von MIDI- und Tastatur-ACIA- 
Daten: 
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Offset Zeiger auf Routine für 


0 

MIDI-Eingabe 

($FC2E94) 

4 

Keyboard-Error 

($FC2A40=RTS) 

8 

MIDI-Error 

($FC2A40=RTS) 

12 

Keyboard-Status 

($FC2558) 

16 

Maus-Bearbeitung 

($FCFE82) 

20 

Uhrzeit-Meldung 

($FC1F08) 

24 

Joystick-Meldung 

($FC2558) 

28 

MIDI-Bearbeitung 

($FC29FC) 

32 

Keyboard-Bearbeitung 

($FC2A0C) 

$E61 

($ElB)Zustand der Sondertasten: 

Bit 

Taste 


0 

Shift rechts 


1 

Shift links 


2 

Control 


3 

Alternate 


4 

CapsLock 


$2740 

($26E0)horizontale Mausposition 


$2742 $26E2)vertikale Mausposition 

$283E $DFE)Status der Maus-/Joystick-Tasten: 

Bit gesetzt, wenn 

0 linke Taste gedrückt 

1 rechte Taste (Joystick-Taste) gedrückt 

6 linke Taste zuletzt gedrückt gewesen 

7 rechte Taste zuletzt 


Hinweis: Beim alten TOS war die Reihenfolge der Bits 0 und 

1 vertauscht! Außerdem sind die Bits 6 und 7 dort 
ohne Funktion. 
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$296C ($290C) 
$2970 ($2910) 
$2972 ($2912) 
$2984 ($2924) 
$2A5E ($29CC) 
$2A60 ($29CE) 
$2A66 ($29D4) 
$2A68 ($29D6) 


Zeichenhöhe des aktuellen Fonts (z.B. 8, 16) 
maximale Cursorzeile (z.B. 24) 

Bytes pro Zeichenzeile 
Zeiger auf die aktuellen Fontdaten 
Bildauflösung: 0=niedrig, l=mittel, 2=hoch 
Druckmodus-Flag: 0=Test, l=Qualität 
Druckertyp 

Druckerport-Flag: 0=parallel, l=seriell 
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8. Anhang 


8.1 Der Atari-ST-Zeichensatz 


ATARI ST-Zeichcnsatz 
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8.2 Tastatur-Codes 

Die folgenden Tastenwerte erhält man z.B. aus der INP(2)- 
Funktion des BASIC. Die internen Scan-Werte der Tastatur 
selbst erhält man, wenn man von den hier angegebenen Werten 
der Sondertasten (Funktions-, Cursor-Tasten, Alternate-Se- 
quenzen) 128 subtrahiert (z.B. Fl: 59). 


Taste 

normal 

+Shift 

+Alt 

+Ctl 

A 

97 

65 

158 

1 

B 

98 

66 

176 

2 

C 

99 

67 

174 

3 

D 

100 

68 

160 

4 

E 

101 

69 

146 

5 

F 

102 

70 

161 

6 

G 

103 

71 

162 

7 

H 

104 

72 

163 

8 

I 

105 

73 

151 

9 

J 

106 

74 

164 

10 

K 

107 

75 

165 

11 

L 

108 

76 

166 

12 

M 

109 

77 

178 

13 

N 

110 

78 

177 

14 

0 

111 

79 

152 

15 

P 

112 

80 

153 

16 

Q 

113 

81 

144 

17 

R 

114 

82 

147 

18 

S 

115 

83 

159 

19 

T 

116 

84 

148 

20 

U 

117 

85 

150 

21 

V 

118 

86 

175 

22 

w 

119 

87 

145 

23 

X 

120 

88 

173 

24 

Y 

121 

89 

172 

25 

Z 

122 

90 

149 

26 

Ä 

132 

142 

93 

4 

Ö 

148 

153 

91 

20 

ü 

129 

154 

64 

1 

ß 

158 

93 

130 

30 
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1 

49 

33 

248 

17 

2 

50 

34 

249 

131 

3 

51 

221 

250 

19 

4 

52 

36 

251 

20 

5 

53 

37 

252 

21 

6 

54 

38 

253 

30 

7 

55 

47 

254 

23 

8 

56 

40 

255 

24 

9 

57 

41 

128 

25 

0 

48 

61 

129 

16 

Taste 

normal 

+Shift 

+Alt 

+Ctl 


Esc 

27 

27 

27 

27 

Tab 

9 

9 

9 

9 

•> 

39 

96 

131 

7 

#35 

94 

35 

3 


Backsp 

8 

8 

8 

8 

+ 

43 

42 

43 

11 

Delete 

127 

127 

127 

31 

Return 

13 

13 

13 

10 

~ 

126 

124 

126 

30 

< 

60 

62 

60 

28 

y 

44 

59 

44 

12 

. 

46 

48 

46 

14 

- 

45 

95 

45 

31 

Space 

32 

32 

32 

185 

Help 

226 

226 

Hardcopy 

226 

Undo 

225 

225 

225 

225 

Insert 

210 

48 

MK.l 

210 

Cur.up 

200 

56 

M.up 

200 

Clr 

199 

55 

MK.r 

247 

Cur.lf 

203 

52 

M.lf 

243 

Cur.dn 

208 

50 

M.dn 

208 

Cur.ri 

205 

54 

M.ri 

244 
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Fl 

187 

212 

187 

187 

F2 

188 

213 

188 

188 

F3 

189 

214 

189 

189 

F4 

190 

215 

190 

190 

F5 

191 

216 

191 

191 

F6 

192 

217 

192 

192 

F7 

193 

218 

193 

193 

F8 

194 

219 

194 

194 

F9 

195 

220 

195 

195 

F10 

196 

221 

196 

196 


Die verwendeten Kürzel bedeuten: 


Cur.up 

Cur.dn 

Cur.lf 

Cur.ri 


Cursor hoch 
Cursor runter 
Cursor links 
Cursor rechts 


MK.l 

MK.r 

M.up 

M.dn 

M.lf 

M.ri 


linker Mausknopf 
rechter Mausknopf 
Maus hoch 
Maus runter 
Maus links 
Maus rechts 


Wenn Sie diese Sequenzen und deren evtl, entsprechende 
Grafikzeichen selbst ausprobieren wollen, dann geben Sie doch 
einmal folgendes Programm ein und betätigen dann irgendwelche 
Tasten: 


'*** Ausgabe der ASCII- und Scan-Werte der Tastatur *** 
Do 

Repeat 
A$=InkeyS 
Until Len(AS) 

If Len(A$)=1 

Print "Normal: 1,1 

B$=A$ 

Else 

Print "Sondertaste: "' 

B$=Right$(A$,1) 
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Endif 

Text Crscol*8-32,Crslin*16-3,B$ 
Print ''$";Hex$(Asc(B$))" 'AscCB$) 
Loop 


8.3 Füllmuster des ST 
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8.4 Schriftarten des ST 


Stil 

G 

Stil 

1 

Stil 

/ 

Stil 


Stil 

8 

Stil 

9 

Stil 

1 Z 

Stil 

y i 

§ -a a a 

ä ß 

§ o a a 

fl 9 

3 8 

2 ® 



(1 fl 

% fl 

a R«n 

R PI 

£J?JU 

2 ® 

ft.A ... 



Stil 2 

Stil 3 

Stil $ 

jr t t / / 

Stil 10 

Stil 11 



Stil 14 

J * / ./ / 5 



\S 'S ?>< 

%./ \V f.5 %•» \.x 

Ä< C*| f m \ 

;?.; i..\ r.-'i .</ 

;V> :? ;>• £>' # 

i> d 1111 

ml 

R <> f: f: $ 

^ ft.n.H.R..2L. 



-^V ”/ J/ 

j? UJUL . KAL. 
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8.5 VT52-Steuersequenzen 


Esc A 
Esc B 
Esc C 
Esc D 
Esc E 

Esc H 
Esc I 
Esc J 
Esc K 
Esc L 
Esc M 

Esc Y (y-32)(x-32) 
Esc b Farbe 

Esc c Farbe 
Esc d 
Esc e 
Esc f 
Esc j 
Esc k 

Esc 1 
Esc o 
Esc p 
Esc q 
Esc v 
Esc w 


Cursor hoch 
Cursor runter 
Cursor rechts 
Cursor links 

Bild löschen und Cursor nach links 
oben 

Cursor in linke obere Ecke 
Cursor hoch, scrollen wenn nötig 
Bildschirm ab Cursor löschen 
Zeile ab Cursor löschen 
Zeile einfügen 
Zeile löschen 

Cursor in X/Y-Position bringen 
Schriftfarbe wählen (0-16 bei 
Farbbild) 

Hintergrundfarbe einstellen (0-16) 

Bildschirm bis Cursor löschen 

Cursor einschalten 

Cursor ausschalten 

Cursorposition speichern 

Cursor auf gespeicherte Position 

setzen 

Zeile löschen 
Zeile bis Cursor löschen 
Reversdarstellung einschalten 
Reversdarstellung ausschalten 
Überlauf an 

Überlauf aus (Cursor bleibt am 
rechten Rand stehen) 


Ausblick 

Mit dem Mega ST hat Atari auch ein neues TOS herausgebracht. 
Wie der Name ’Blitter-TOS’ schon ausdrückt, wurde hier vor al¬ 
lem der Blitter vom Betriebssystem berücksichtigt. Das TOS stellt 
selbständig fest, ob im Rechner ein Blitter eingebaut ist oder 
nicht. Abhängig davon läuft dann die Grafik-Ausgabe über den 
Blitter oder wird wie zuvor rein softwaremäßig realisiert. 
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Da man nun schon einmal beim Ändern war, hat man gleich 
noch ein paar Kleinigkeiten verbessert. Die wichtigste davon war 
das sogenannte MO-Ordner-Problem’. Darunter ist die Tatsache 
zu verstehen, daß das TOS für jeden Ordner, der irgendwann 
einmal benutzt wird, intern Verwaltungsinformationen speichert. 
Das Problem dabei war (und ist immer noch), daß der dafür 
benötigte Speicherplatz nicht von den gesamten zur Verfügung 
stehenden mehreren Megabyte genommen wird, sondern aus 
einem fixem Bereich, der gerade für die besagten 40 Ordner 
Platz hat. Beim Arbeiten mit Diskette war dies nicht relevant, da 
man zum einem kaum 40 Ordner auf einer Diskette hat und zum 
anderen dieser Speicherplatz bei jedem Diskettenwechsel wieder 
freigegeben wurde. Da eine Harddisk jedoch schwierig zu 
wechseln ist und aufgrund der höheren Speicherkapazität leicht 
hundert oder mehr Ordner enthalten kann, stößt man dort 
schnell an eine Grenze. Um das Problem beim Mega ST etwas 
abzumildern, ist man hier einfach hingegangen und hat den 
internen Speicherbereich vergrößert, so daß nun gut hundert 
Ordner die Grenze bilden. 

Eine endgültige Lösung stellt diese Verfahrensweise jedoch nicht 
dar - man schiebt das Problem nur etwas weiter raus. In diesem 
Zusammenhang kommen wir gleich noch auf zwei weitere ver¬ 
besserungswürdige Dinge. Diesmal betrifft es den Harddisk- 
Treiber, der nur Partitions von maximal 16 MByte erlaubt. Bei 
einer 20-MByte-Festplatte mag man dies noch akzeptieren, in 
dem Maße jedoch, in dem die Festplattenpreise sinken und die 
verfügbaren Kapazitäten steigen, ist der nächste Engpaß schon 
vorprogrammiert. Ist dieses Problem gelöst, tut sich direkt das 
nächste auf. Diesmal ist das GEMDOS der Übeltäter. Je größer 
eine Partition wird, desto langsamer wird die FAT-Verwaltung 
(File Allocation Table, Verwaltungsinformation über die Bele¬ 
gung der Platte durch die einzelnen Dateien). Sie können das 
selbst ausprobieren, indem Sie auf einer' Festplatten-Partition, 
die z.B. schon 10 MByte an Daten enthält, versuchen, einen 
neuen Ordner anzulegen. Sie werden eine deutliche Wartezeit 
feststellen. Noch langsamer wirdes, wenn Sie sich den freien 
Speicherplatz auf dieser Diskette anzeigen lassen. Hier können 
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Sie sich auf ca. 10 Sekunden Wartezeit einrichten. Aus diesem 
Grunde liegt in letzter Zeit den Festplatten ein Programm 
TURBO-DOS’ bei, das etwas Tempo in diese Sache bringt. 

Wie sieht die Zukunft der Atari ST Serie aus? 

Anscheinend hat auch Atari sich Gedanken darüber gemacht. 
Wie man aus der Presse entnehmen kann, hat Atari zur Zeit eine 
neue TOS-Version an Software-Entwickler zum Test in Umlauf 
gebracht, die unter anderem obige Verbesserungen enthalten soll. 
Weiterhin sollen die bis jetzt bekannt gewordenen Fehler im 
GEMDOS beseitigt worden sein. Auch das Desktop selbst, die 
Benutzeroberfläche der Atari-ST-Rechner hat einige neue 
Funktionen bekommen und ist dadurch noch anwenderfreund¬ 
licher geworden. So soll es jetzt möglich sein, GEM-Programme 
nach dem Einschalten des Rechners automatisch zu starten, was 
bisher nur für TOS-Programme galt. Das Umbenennen von Ord¬ 
nern ist jetzt möglich. Kopier- und Lösch-Operationen können 
jetzt per Tastendruck unterbrochen werden. Beim Formatieren 
von Disketten kann man diesen jetzt einem Namen geben. 

Der Fileselektor soll dahingehend modifiziert worden sein, daß 
die Auswahl eines anderen Drives jetzt durch Anklicken eines 
Buttons geschehen kann; das mühsame Editieren der Pfad-Zeile 
kann damit entfallen. Optional kann der Fileselektor noch eine 
Überschrift bekommen, z.B. 'Text Laden’, damit der Anwender 
über die ausgelöste Aktion. Eine weitere Neuerung ist die Mög¬ 
lichkeit, einen Reset durch gleichzeitiges Drücken der Tasten 
Control, Alt und Del auszulösen, so wie PC-Anwender dies ge¬ 
wohnt sind. 

Die beschriebenen Änderungen machen den Atari ST also noch 
benutzerfreundlicher. Es bleibt Ihnen zur Zeit also nur abzu¬ 
warten, ob und wann das neue TOS kommt. 



' 
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Stichwortverzeichnis 

Adressierung mehrerer Festplatten. 68 

AHDI.PRG . 491 

Akustikkoppler . 146 

Aladin . 156 

Alert-Fensters . 323 

Applikations-Behandlung . 339 

APPL_EXIT . 339 

APPL_FIND . 339 

APPL_INIT . 340 

APPL_READ . 340 

APPL_TPLAY . 341 

APPL TRECORD . 341 

APPL_WRITE . 342 

ARC . 280 

Assembler . 122 

Atari-Laserdrucker SLM804 . 166 

Atari-Programme zum Laserdrucker . 173 

Attribute-Funktionen . 286 

Ausgabe-Funktionen . 275 

AUTO-Ordner . 48 

Automatisches Konfigurieren der RAM-Disk . 502 

Backup der Festplatte . 71 

BAR . 279 

BASIC . 124 

Betriebssystem-Programmierung . 221 

BIOS . 235 

BIOS-Listing . 381 

Boot-Sektor . 482 

Booten von der Festplatte aus . 69 

C . 128 

CELL ARRAY . 277 

CIRCLE . 281 

CLEAR WORKSTATION . 272 

CLOSE VIRTUAL SCREEN WORKSTATION . 272 
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CLOSE WORKSTATION . 270 

Compiler . 121 

CONTOUR FILL . 278 

COPY RASTER,OPAQUE. 300 

COPYRASTER, TRANSPARENT . 301 

Datei-Icon . 41 

Dateien löschen . 48 

Dateiverwaltungen . 96 

Datenbanksysteme . 96 

Desk-Accessorys . 48 

Desktop Publishing mit BECKERpage ST . 114 

Desktop Publishing und Mega ST . 103 

Directory . 482 

DIRSLEFT.PRG . 494 

Disketten-Monitor . 240 

Diskettenlaufwerke . 151, 481 

DMA-Port . 139 

Dokument . 41 

Drucker-Anpassung . 160 

Drucker anschließen . 164 

DTP in der Praxis . 113 

DTP-Software für den Mega ST . 109 

Eingabe-Funktionen . 303 

Einstieg in GEM . 34 

ELLIPSE . 284 

ELLIPTICAL ARC . 282 

ELLIPTICAL PIE . 283 

Ereignis-Behandlung . 332 

EVNT_BUTTON . 332 

EVNT DCLICK . 334 

EVNT_KEYBD. 334 

EVNT MESAG. 336 

EVNT_MOUSE . 334 

EVNT_MULTI . 336 

EVNT TIMER . 335 

EXCHANGE BUTTON CHANGE VECTOR . 313 

EXCHANGE CURSOR CHANGE VECTOR . 315 
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EXCHANGE MOUSEMOVEMENT VECTOR . 314 

EXCHANGE TIMERINTERRUPT VECTOR . 311 

EXTENDED INQUIRE FUNCTION . 316 

Festplatte . 156 

Festplatte vorbereiten . 61 

Festplatten-Hilfsprogramme . 61 

FILL RECTANGLE . 279 

FILLED AREA . 276 

FILLED ROUNDEDRECTANGLE. 285 

FOLDR1 OO.PRG . 494 

Fontheader-Adressen . 255 

Formatieren einer Diskette . 43 

Formatieren .42 

FORM ALERT . 352 

FORM_BUTTON . 352 

FORM CENTER . 353 

FORMDIAL . 354 

FORM_DO . 355 

FORM ERROR . 355 

FORM KEYBD . 356 

FSEL INPUT . 351 

Füllmuster . 525 

Funktionen der Desktop-Rollmenüs . 50 

GEM . 33 

GEM-AES . 322 

GEM-VDI . 263 

GEMDOS. 221 

GEMDOS-Fehlermeldungen . 234 

GET PIXEL . 303 

Grafik einbinden mit BECKERpage ST . 115 

Grafik-Behandlung . 360 

Grafikanwendungen . 86 

Grafische Grundfunktionen . 279 

GRAF_DRAGBOX . 362 

GRAF GROWBOX . 364 

GRAF HANDLE . 360 

GRAF_MKSTATE . 368 

GRAF MOUSE . 367 
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GRAF_MOVEBOX . 363 

GRAF_RUBBERBOX . 361 

GRAFSHRINKBOX . 365 

GRAF SLIDEBOX . 367 

GRAF_WATCHBOX . 366 

Hardware . 149 

HDX.PRG . 492 

HIDE CURSOR . 312 

Hilfe für die Harddisk . 157 

HINSTALL.PRG. 494 

INPUT CHIOCE, REQUEST MODE . ’ . 307 

INPUT CHOICE, SAMPLE MODE . 308 

INPUT LOCATOR, SAMPLE MODE . 305 

INPUT LOCATOR,REQUEST MODE . 304 

INPUT STRING, REQUEST MODE. 309 

INPUT STRING, SAMPLE MODE . 309 

INPUT VALULATOR, REQUEST MODE . 306 

INQIRE CURRENT FILL AREA ATTRIBUTES . 319 

INQUIRE CHARACTER CELL WIDTH . 321 

INQUIRE COLOR REPRESENTATION . 317 

INQUIRE CURRENT GRAPHIC TEXT ATTRIBUTES. 320 

INQUIRE CURRENT POLIMARKER ATTRIBUTES . 319 

INQUIRE CURRENT POLYLINE ATTRIBUTES . 318 

INQUIRE TEXT EXTEND. 320 

INSERT VALULATOR, SAMPLE MODE . 307 

Installation der Partitionen. 67 

Interpreter . 121 

Joystick-Bewegung . 218 

Joystick-Schnittstelle . 135 

JUSTIFIED GRAPHICS TEXT. 285 

Kommunikations-Software und -Hardware . 144 

Komplettes Inhaltsverzeichnis . 487 

Kontroll-Funktionen . 268 

Kopieren ganzer Disketten . 44 

Kopieren und Backup . 70 

Kopieren von Dateien . 46 
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LINE A . 253 

LINE_A-Variablen . 255 

LOAD FONTS . 273 

Löschen von Partitionen . 68 

Maus-Schnittstellen . 135 

MENU BAR . 356 

MENU_ICHECK . 357 

MENU_IENABLE . 358 

MENU_REGISTER . 360 

MENU_TEXT. 359 

MENU_TNORMAL . 358 

MIDI-Schnittstelle . 136 

Modem . 146 

Modula 2 . 127 

Monitor . 149 

MS-DOS und die Fremdlaufwerke . 154 

Nachfrage-Funktionen . 316 

OBJC ADD . 342 

OBJC_CHANGE . 343 

OBJC_DELETE . 344 

OBJCDRAW . 344 

OBJC_EDIT . 345 

OBJC_FIND . 346 

OBJC_OFFSET . 346 

OBJC_ORDER . 347 

Objektbaumstruktur-Behandlung . 347 

Objektbehandlung . 342 

OPEN VIRTUAL SCREEN WORKSTATION . 271 

OPEN WORKSTATION . 268 

Ordner . 39 

Ordner löschen . 48 

Parallel- oder Centronics-Port. 137 

Parameterfelder . 264 

Partitionen . 492 

Partitionieren und Formatieren .63 

PC-DITTO . 155 
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Peripherie . 149 

Peripheriebausteine . 201 

PIE . 281 

POLYLINE. 275 

POLYMARKER . 275 

PostScript. 111 

Professionelle Software. 77 

Programm-Icon . 38 

Programme starten . 38 

Programme zur Textverarbeitung . 77 

Programmieren . 120 

Programmierung des Blitters. 206 

Public-Domain-Programmen . 75 

Pull-Down-Menü Handhabung . 356 

RAM-Disk . 50 

RAM-Vektoren . 517 

Raster-Operationen . 300 

Reservieren . 222 

ROM-Modul-Port. 135 

ROUNDED RECTANGLE. 284 

RS232-Port . 147 

RSRC_FREE . 347 

RSRC GADDR. 348 

RSRC_LOAD . 349 

RSRC OBFIX . 349 

RSRC_SADDR . 350 

SAMPLE KEYBOARD KEY INFORMATION . 315 

SAMPLE MOUSE BUTTON STATE . 313 

Scan-Werte . 522 

Schnittstellen . 133 

Schriftarten . 526 

Scrap-Funktionen . 369 

SCRP_READ. 369 

SCRP_WRITE . 370 

Serielle Schnittstelle (RS232) . 139 

SET CHARACTER BASELINE VEKTOR . 294 

SET CHARACTER CELL HEIGHT, POINT MODE . 293 

SET CHARACTER HEIGHT, ABSOLUTE MODE . 292 
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SET CLIPPING RECTANGLE . 274 

SET COLORREPRESENTATION . 287 

SET FILL COLORINDEX . 298 

SET FILL INTERIOR STYLE . 297 

SET FILL PERIMETER VISIBILITY . 299 

SET FILL STYLEINDEX . 298 

SET GRAPHIC TEXT SPECIAL EFFECTS . 295 

SET GRAPHIK TEXT ALIGNMENT . 296 

SET GRAPHIK TEXT COLOR INDEX . 295 

SET INPUT MODE . 303 

SET MOUSE FORM . 310 

SET POLYLINE COLOR INDEX . 288 

SET POLYLINE END STYLES . 290 

SET POLYLINE LINE TYPE . 288 

SET POLYLINE LINE WIDTH . 290 

SET POLYMARKER COLOR INDEX . 292 

SET POLYMARKER HEIGHT . 291 

SET POLYMARKER TYPE . 291 

SET TEXT FACE . 294 

SET USER DEFINED FILL PATTERN . 299 

SET USER-DEFINED LINE STYLE PATTERN . 289 

SET WRITING MODE . 286 

SH204DVR.SYS-Datei . 495 

Shell-Funktionen . 370 

SHEL_FIND . 370 

SHEL GET . 371 

SHEL PUT. 371 

SHEL READ . 371 

SHEL WRITE . 372 

SHIP.PRG . 495 

SHOW CURSOR . 312 

SLM804 . 169 

Software. 73 

Speicherbereich . 222 

Speicherverwaltung . 514 

Sprite . 260 

Strukturiert mit Pascal . 126 

Systemvariablen . 517 
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Tastatur-Codes . 522 

Tastatur-Prozessor . 214 

Tastatur-Schnittstellen . 135 

Tastaturprozessor-Kommandos . 216 

TEXT . 276 

Text einbinden . 116 

TOS . 33 

TOS-Anwendungen . 34 

Tracks und Sektoren . 482 

TRANSFORM FORM . 302 

Transport der Festplatte . 68 

Uhrzeit setzen . 219 

UNLOAD FONTS . 274 

Unterverzeichnis-Icon . 39 

UPDATE WORKSTATION . 273 

Verwaltung von Formularen . 351 

Video-Anschluß . 138 

VT52-Steuersequenzen . 527 

WINDOW-Behandlung . 325 

WIND_CALC . 331 

WIND_CLOSE . 328 

WIND_CREATE . 326 

WIND_DELETE . 328 

WIND FIND . 330 

WIND GET . 325 

WIND_OPEN . 327 

WIND SET . 329 

WINDjUPDATE . 331 

XBIOS . 239 


Zweiter Floppy-Anschluß 


136 

































Bücher zum Atari ST 


Dieses Buch möchte vermeiden, daß beim Programmieren das 
Rad noch einmal erfunden werden muß. Struktogramme zu Stan¬ 
dard-Algorithmen und einführende Erläuterungen fügen sich zu 
einem Nachschlagewerk zusammen, mit dem sowohl Anfänger 
als auch Fortgeschrittene zurechtkommen. Zu den möglichst por¬ 
tabel gehaltenen Algorithmen kommen in einem zweiten Teil nützli- 
cheTools für den ST. Gleichzeitig bietet dieses Buch einen Einstieg 
in das neue GFA-BASIC Version 3.0, eine komplett dokumentierte 
AES-Liste der neu hinzugekommenen AES-Bibliothek sowie eine 
Gegenüberstellung der Befehle GFA V2.0 und V3.0, um Ihnen die 
Anpassung Ihrer alten Programme zu erleichtern. 


Das große 
GFA-Programmier- 
Handbuch 

$S»r^ 


GFA 2.0 
GFA 3.0 




Aus dem Inhalt: 

- Einführung in die Benutzung von 
Struktogrammen 

- Textverarbeitung: Flatter- und 
Blocksatz, Silbentrennung, 
Wordwrap 

- Datenverarbeitung: Sequentielle, 
Index-Sequentielle und Random- 
Access-Dateien 

- Grafik: Vektorgrafik, Drehen, 
Spiegeln und Verschieben von 
Objekten, Barcodes 

- Mathematik: Matrizenrechnung, 
Nullstellen, Integral- und 
Differentialrechnung, Finanzmathe¬ 
matik, Zahlensysteme, Statistik 

- Kalenderberechnung, 

- Strategie-Algorithmen 

- Tools: Automatisches Backup, 
REM-Killer, Diagramme, 
3-D-Funktionsplotter 

- GFAV3.0: AES-Liste, Befehlsliste 
GFAV2.0 -V3.0 


Liesert, Linden 

Das große GFA-Programmier-Handbuch 
Tools & Algorithmen 
Hardcover, 480 Seiten, DM 59,- 
ISBN 3-89011-258-7 









Bücher zum ST 


Nach den ersten gescheiterten Versuchen mit ATARI-BASIC haben Sie 
sich bestimmt nach einer besseren Wrsion umgeschaut. Das GFA-BASIc 
ist sicherlich eine der leistungsstarksten Programmiersprachen auf dem 
ST. Gerade dadurch ist es aber für den Anfänger meist nicht leicht zu ver¬ 
stehen. Genau hier setzt das Buch an. Von der Installation einer Arbeitsko¬ 
pie bis hin zu einfachen GEM-Funktionen wird der Grundwortschatz von 
GFA-V3.0 und V2.0 leichtverständlich an vielen Beispielen erklärt. 



Aus dem Inhalt: 

- Einführung in die Bedienung des 
GFA-Editors 

- Zuweisungen und Variablendeklaration 

- Ein-und Ausgaben 

- Schleifenprogrammierung an Beispielen 

- strukturierte Programmierung 

- Grafikprogrammierung mit Minigrafik¬ 
programm 

- Diskettenoperationen 

- kleines Datenbankprogramm 

- Pannenhilfe-Vermeidung von Fehlern 

- Konvertierungshinweise GFAV2.0 nach 
GFAV3.0 

- ausführliche Funktionsübersicht zum 
schnellen Nachblättern 


Schumann 

GFA-BASIC für Einsteiger 
ca. 250 Seiten, DM 29,- 
ISBN 3-89011-248-X 
erscheint ca. 7/88 







Bücher zum Atari ST 


Der Atari ST ist durch seinen guten Monitor, die hohe Auflösung 
und die vorhandene Speicherkapazität sowohl für Textverarbei¬ 
tung als auch für Graphik hervorragend geeignet. Mit Ist Word 
Plus werden diese Komponenten in sinnvoller Weise vereint. 
Zusammen mit dem Erweiterungsprogramm in Ist Word Plus ent¬ 
steht somit ein sehr komfortables Textverarbeitungssystem, wel¬ 
ches selbst hohen Ansprüchen gerecht wird, wie die vielen Abbil¬ 
dungen in diesem Buch beweisen. 



Aus dem Inhalt: 


- Ist Word Plus 

- Ist Mail 

- 1 st Lektor 

- Ist Proportional 

- Ist Index 

- Textgestaltung mit Ist Word Plus 

- Wörterbücher 

- Zusammenarbeit der verschiedenen 


Programme 

- Umfangreiches Kapitel über Druckeranpas¬ 


sung 

- Durch neue Druckertreiber neue 


Möglichkeiten und verbesserte Leistung 

- Graphik im Text 

- Desktop Publishing mit Ist Word Plus? 

- Ausführliches Glossar 


Kraus 

Das große Buch zu Ist Word Plus 
288 Seiten, DM 59,- 
ISBN 3-89011-190-4 









Bücher zum ATARI ST 


Die Grafikfähigkeiten des ST gezielt für eigene Anwendungen 
einsetzen - dieses Buch zeigt Ihnen, wie es geht. Mit den vie¬ 
len Beispielprogrammen in GFA-BASIC, C und Assembler, 
deren Source-Code komplett auf der Diskette zum Buch mit¬ 
geliefert wird, bestimmen Sie den Schwierigkeitsgrad selbst. 
So ist Ihr Erfolg vorprogrammiert. 


Aus dem Inhalt: 

- Bildschirmfenster und Grafikausgaben 

- Grundlegende Grafikroutinen 

- Mausverwaltung 

- Sprite-Programmierung 

- Poster-Hardcopy 

- 3-D-Grafik und CAD 

- Bewegte Bilder in 3-D 

- Laufschriften 

- Spiele 

- Funktionsdarstellungen 

- Busineß-Grafik 

- Statistik 

- GDOS und Metafiles 

- Trickfilmproduktion mit Super-8 und Video 

- Grafikmanipulationen 

- Programmierung des Rasterzeileninterrupt 

- Flackerfreie Animation 

- Anschluß fremder Monitore 

- Ein-/Ausgabe von Grafiken auf Diskette 

- Druckeransteuerung 

- Viele Grafikalgorithmen 


Plenge 

Das Supergrafik-Buch zum Atari ST 
338 Seiten, DM 69,- 
ISBN 3-89011-004-5 





Bücher zum Atari ST 


Dieser INTERN-Band ist das Standardbuch zur Programmie¬ 
rung der Atari-ST-Computer. Sie finden alle Informationen 
zum Aufbau und zur Funktion Ihres Rechners, die zur profes¬ 
sionellen Programmierung unentbehrlich sind. 



Aus dem Inhalt: 

- Der 68000-Prozessor 

- Funktion der Custom-Chips 

- DerBlitter 

- Der I/O-Controller MFP 68901 

- Der Soundgenerator YM-2149 

- Der Tastaturprozessor 6301 und 
seine Befehle 

- Alles über die Schnittstellen des ST 

- Memorymap des Atari ST 

- Die Systemvariablen und ihre 
Bedeutung 

- WasistGEMDOS 

- Die Aufgabe von BIOS und XBIOS 

- Grafikprogrammierung des Atari ST 

- Dokumentiertes BIOS-ROM-Listing 

- Tabellen zum schnellen Nachschla¬ 
gen GEMDOS, BIOS, XBIOS 


Brückmann, Englisch, Gerits 
Atari ST Intern 
637 Seiten, DM 69,- 
ISBN 3-89011-119-x 
































DAS STEHT DRIN: 

Der Mega ST, das Flaggschiff von Atari, verfügt über eine Vielzahl 
von Anwendungsmöglichkeiten, die sich u.a. aus dem extrem gro¬ 
ßen Arbeitsspeicher dieses Rechners ergeben. Insbesondere in 
den Bereichen Desktop Publishing (DTP) und Programmierung er¬ 
weist sich der Mega ST als vielseitig und anderen Geräten weit 
überlegen. In diesem Buch gehen die Autoren ausführlich auf die 
Möglichkeiten dieses Rechners ein und weisen darüber hinaus 
auf alle technischen Einzelheiten hin, deren Kenntnis für jeden 
Mega-ST-Besitzer unerläßlich ist. Besonders interessant ist es für 
alle, die das dokumentierte Blitter-TOS für die eigene Programm¬ 
entwicklung nutzen wollen. 

Aus dem Inhalt: 

- Die Bedienung und die Handhabung des Mega ST 

- Die Software für den Mega ST (Textverarbeitungen, Datenban¬ 
ken, Tabellenkalkulationen usw.) 

- Desktop Publishing mit dem Mega ST (Beckerpage ST usw.) 

- Die Programmierung des Mega ST (AES, VDI, BIOS, XBIOS, 
GEMDOS usw.) 

- Die Peripherie des Mega ST (Festplatte, Laserdrucker usw.) 

- Der Aufbau des Rechners 

- Die Nutzung des großen RAM-Speichers - RAM-Disk bis 3,5 
MByte mit Autokonfiguration 

- Nützliche Beispielprogramme und ein ausführlich dokumentier¬ 
tes Blitter-TOS-Listing 

UND GESCHRIEBEN HAT DIESES BUCH: 

Ein professioneller EDV-Fachmann, ein Software-Entwickler und 
ein Mitarbeiter der Zeitschrift DATA WELT bürgen für Richtigkeit 
und leichtverständliche Darstellung dieses Buches: Stefan A. 
Dittrich, Lothar Englisch und Rainer Severin, drei erfahrene Auto¬ 
ren, vermitteln begeistert und gekonnt die Möglichkeiten dieses 
Rechners. 


ISB N 3-89011-196-3 DM +069.00 


DM 69,- 
ÖS 538,- 
sFr 67,- 
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